rsin B (should all be same)

Time bar (total: 12.7s)

start0.0ms (0%)

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

analyze274.0ms (2.2%)

Memory
1.2MiB live, 253.5MiB allocated; 52ms 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)

sample2.2s (17.3%)

Memory
-54.9MiB live, 2 433.1MiB allocated; 1.3s collecting garbage
Samples
1.2s6 017×1valid
176.0ms2 239×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-cos: 437.0ms (40.4% of total)
ival-sin: 250.0ms (23.1% of total)
adjust: 215.0ms (19.9% of total)
ival-mult!: 70.0ms (6.5% of total)
ival-div!: 61.0ms (5.6% of total)
ival-add!: 46.0ms (4.3% of total)
Bogosity

explain183.0ms (1.4%)

Memory
-35.2MiB live, 260.7MiB allocated; 69ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
67129(1.381171045284626e+280 3.1806694607198355e+264 2.0995641480767796e-185)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))sensitivity1960
Confusion
Predicted +Predicted -
+670
-12960
Precision
0.34183673469387754
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6700
-129060
Precision?
0.34183673469387754
Recall?
1.0
Freqs
test
numberfreq
060
1196
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
67.0ms382×1valid
9.0ms130×0valid
Compiler

Compiled 69 to 28 computations (59.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 53.0ms
ival-cos: 18.0ms (34% of total)
ival-sin: 12.0ms (22.7% of total)
ival-mult!: 8.0ms (15.1% of total)
adjust: 7.0ms (13.2% of total)
ival-div!: 4.0ms (7.6% of total)
ival-add!: 3.0ms (5.7% of total)

preprocess52.0ms (0.4%)

Memory
-9.7MiB live, 35.6MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03897
110397
220697
342897
477097
5163097
6349197
7651797
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶78.1%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Symmetry

(negabs r)

Compiler

Compiled 18 to 16 computations (11.1% saved)

series21.0ms (0.2%)

Memory
-1.7MiB live, 43.5MiB allocated; 5ms 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
3.0ms
b
@inf
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
3.0ms
a
@0
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
2.0ms
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
r
@inf
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)

rewrite214.0ms (1.7%)

Memory
44.0MiB live, 262.3MiB allocated; 43ms 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 (neg.f64 (cos.f64 (+.f64 a b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
r
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 (+.f64 a b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (neg.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64)))) (neg.f64 (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(-.f64 (/.f64 (*.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))
(+.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))) (/.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))))
(+.f64 a b)
(+.f64 b a)
a
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx r r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b)))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx a a)
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 b b) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 (cos.f64 a) #s(literal -1/2 binary64))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (neg.f64 b))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval25.0ms (0.2%)

Memory
-28.3MiB live, 27.0MiB allocated; 21ms collecting garbage
Compiler

Compiled 1 758 to 422 computations (76% saved)

prune8.0ms (0.1%)

Memory
22.0MiB live, 22.0MiB allocated; 0ms collecting garbage
Pruning

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New642084
Fresh000
Picked101
Done000
Total652085
Accuracy
99.8%
Counts
85 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶78.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
▶78.0%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
▶99.5%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶99.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶38.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶39.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶46.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
▶64.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
▶57.4%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
▶58.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
▶54.4%
(*.f64 r (/.f64 (sin.f64 b) #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)))))
▶55.9%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
▶53.3%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
▶53.3%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
▶55.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
▶53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
▶53.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
▶57.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
▶53.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
▶53.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 356 to 253 computations (28.9% saved)

series327.0ms (2.6%)

Memory
-2.3MiB live, 554.8MiB allocated; 154ms collecting garbage
Counts
116 → 564
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 b (/.f64 r (cos.f64 a)))
b
(/.f64 r (cos.f64 a))
r
(cos.f64 a)
a
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b)
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a)))
(/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 (sin.f64 a) r)
(sin.f64 a)
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
(tan.f64 b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
(/.f64 b (cos.f64 a))
(*.f64 r #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 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)))
(fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b)))
#s(approx (sin b) b)
(cos.f64 (+.f64 a b))
(+.f64 a b)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(*.f64 b b)
#s(literal -1/6 binary64)
#s(literal 1 binary64)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(sin.f64 b)
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
(fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))
(neg.f64 b)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (sin.f64 b) #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 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))
(-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a))
(*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64))
(*.f64 (cos.f64 a) b)
#s(literal -1/2 binary64)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(-.f64 (*.f64 a a) (*.f64 b b))
(*.f64 a a)
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (+.f64 a b))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.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 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(*.f64 (sin.f64 b) (sin.f64 a))
(*.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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
Outputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx r #s(hole binary64 r))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (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 (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 (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* 1/2 (* a b)) (pow b 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* a (+ (* 1/2 b) (* a (* b (- (* -1/6 b) (* -1 b)))))) (pow b 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 a))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (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 (/ b (cos a)) #s(hole binary64 b))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 b) (+ (* 1/48 b) (* 1/2 (+ (* -1/4 b) (* 1/24 b))))))) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 1))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 b)))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (* (cos a) b) #s(hole binary64 b))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 b))))))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (sin b) (sin (- (* 1/2 (PI)) b))) (/ (* a (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#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 (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ b (cos a)) #s(hole binary64 (/ b (cos a))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (* (cos a) b) #s(hole binary64 (* b (cos a))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#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 (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin 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 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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#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 (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (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 b #s(hole binary64 b))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ 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 (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 (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (cos a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ 1 (sin (- (* 1/2 (PI)) a))) (/ (* b (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) a)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#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 (- (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ (* (pow b 2) (sin a)) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 2) (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ (* b (sin a)) (pow (cos a) 2))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#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)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
Calls

9 calls:

TimeVariablePointExpression
94.0ms
a
@0
((* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) b (/ r (cos a)) r (cos a) a (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ (sin a) (pow (cos a) 2)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (pow (tan b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (neg b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* a a) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (/ (PI) 2) (PI) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r))
44.0ms
a
@-inf
((* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) b (/ r (cos a)) r (cos a) a (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ (sin a) (pow (cos a) 2)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (pow (tan b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (neg b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* a a) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (/ (PI) 2) (PI) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r))
29.0ms
a
@inf
((* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) b (/ r (cos a)) r (cos a) a (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ (sin a) (pow (cos a) 2)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (pow (tan b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (neg b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* a a) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (/ (PI) 2) (PI) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r))
28.0ms
b
@0
((* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) b (/ r (cos a)) r (cos a) a (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ (sin a) (pow (cos a) 2)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (pow (tan b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (neg b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* a a) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (/ (PI) 2) (PI) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r))
27.0ms
b
@inf
((* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) b (/ r (cos a)) r (cos a) a (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/ (* (sin a) r) (pow (cos a) 2)) (* (sin a) r) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ (sin a) (pow (cos a) 2)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (pow (tan b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* (+ (* (* b b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (* b b) -1/6 1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (neg b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) -1/2 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* a a) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (/ (PI) 2) (PI) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r))

rewrite266.0ms (2.1%)

Memory
35.3MiB live, 426.1MiB allocated; 47ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0237520644
0258317994
0930317507
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
680 → 852
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 b (/.f64 r (cos.f64 a)))
b
(/.f64 r (cos.f64 a))
r
(cos.f64 a)
a
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b)
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a)))
(/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 (sin.f64 a) r)
(sin.f64 a)
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))
(tan.f64 b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
(/.f64 b (cos.f64 a))
(*.f64 r #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 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)))
(fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b)))
#s(approx (sin b) b)
(cos.f64 (+.f64 a b))
(+.f64 a b)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(*.f64 b b)
#s(literal -1/6 binary64)
#s(literal 1 binary64)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(sin.f64 b)
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
(fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))
(neg.f64 b)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (sin.f64 b) #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 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))
(-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a))
(*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64))
(*.f64 (cos.f64 a) b)
#s(literal -1/2 binary64)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(-.f64 (*.f64 a a) (*.f64 b b))
(*.f64 a a)
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (+.f64 a b))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.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 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(*.f64 (sin.f64 b) (sin.f64 a))
(*.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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx r #s(hole binary64 r))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a r)))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* (sin a) r) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (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 (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 (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* 1/2 (* a b)) (pow b 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* a (+ (* 1/2 b) (* a (* b (- (* -1/6 b) (* -1 b)))))) (pow b 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 a))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (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 (/ b (cos a)) #s(hole binary64 b))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 b) (+ (* 1/48 b) (* 1/2 (+ (* -1/4 b) (* 1/24 b))))))) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 1))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 b)))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (* (cos a) b) #s(hole binary64 b))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 b))))))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (sin b) (sin (- (* 1/2 (PI)) b))) (/ (* a (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#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 (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (/ (sin a) (pow (cos a) 2)) #s(hole binary64 (/ (sin a) (pow (cos a) 2))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ b (cos a)) #s(hole binary64 (/ b (cos a))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (* (cos a) b) #s(hole binary64 (* b (cos a))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#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 (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin 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 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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#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 (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (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 b #s(hole binary64 b))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ 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 (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 (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (cos a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ 1 (sin (- (* 1/2 (PI)) a))) (/ (* b (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) a)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#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 (- (* (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ (* (pow b 2) (sin a)) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 2) (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ (* b (sin a)) (pow (cos a) 2))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (pow (tan b) 2) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#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)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 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 b (/.f64 r (cos.f64 a))))
(*.f64 b (/.f64 r (cos.f64 a)))
b
(/.f64 (neg.f64 r) (neg.f64 (cos.f64 a)))
(/.f64 r (cos.f64 a))
r
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
a
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b)
(/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (*.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a)))) (-.f64 (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a))))
(/.f64 (+.f64 (pow.f64 (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a))) (*.f64 (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a))))))
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a)))
(+.f64 (*.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) r)) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 (sin.f64 a) r)
(sin.f64 a)
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 r #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))))))) (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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
(/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (-.f64 (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (*.f64 (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
(fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(+.f64 (*.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(/.f64 (neg.f64 (sin.f64 a)) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(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)))
#s(literal -1 binary64)
(*.f64 r #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 (cos.f64 a)))
(/.f64 (neg.f64 b) (neg.f64 (cos.f64 a)))
(/.f64 b (cos.f64 a))
(*.f64 r #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 (pow.f64 (tan.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 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)))
(/.f64 (-.f64 (*.f64 (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (-.f64 (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
(/.f64 (+.f64 (pow.f64 (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (tan.f64 b) #s(literal 3 binary64))) (fma.f64 (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (-.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (tan.f64 b)))))
(fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))
(+.f64 (*.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (tan.f64 b))
(*.f64 (tan.f64 b) (tan.f64 b))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 b)) #s(literal 2 binary64)))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 #s(approx (sin b) b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b)))
#s(approx (sin b) b)
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (neg.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 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (neg.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 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(-.f64 (/.f64 (*.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))
(+.f64 a b)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (*.f64 (*.f64 b b) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
#s(literal -1/6 binary64)
#s(literal 1 binary64)
(*.f64 r (/.f64 (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)))))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 #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)))))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(/.f64 (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)))))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.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)))))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 b) (sin.f64 a)) (*.f64 (neg.f64 b) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 b) (sin.f64 a)) (cos.f64 a)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 b) (sin.f64 a)) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 b) (sin.f64 a)) (*.f64 (neg.f64 b) (sin.f64 a)) (-.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 b) (sin.f64 a)) (cos.f64 a)))))
(fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))
(+.f64 (*.f64 (neg.f64 b) (sin.f64 a)) (cos.f64 a))
(neg.f64 b)
(*.f64 r (/.f64 (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)))))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 #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)))))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (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)))))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) 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)))))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (cos.f64 a)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (-.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (cos.f64 a)))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (cos.f64 a))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (fma.f64 (sin.f64 a) (sin.f64 a) (*.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)))))
(-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a))
(*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64))
(*.f64 (cos.f64 a) b)
#s(literal -1/2 binary64)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) a))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) a))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) a)))
(sin.f64 (+.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) a)))
(cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) b))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) b)))
(sin.f64 (+.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) b)))
(cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(sin.f64 (+.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(/.f64 (-.f64 (*.f64 (/.f64 b a) (/.f64 b a)) #s(literal 1 binary64)) (-.f64 (/.f64 b a) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 b a) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 b a) (/.f64 b a) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 b a) #s(literal 1 binary64)))))
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (neg.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 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (neg.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 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(-.f64 (/.f64 (*.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))
(+.f64 a b)
(/.f64 (-.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (fma.f64 (*.f64 a a) (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))))
(-.f64 (*.f64 a a) (*.f64 b b))
(*.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 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (fma.f64 b b (*.f64 a b))))
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (neg.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 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (neg.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 (+.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 (*.f64 (neg.f64 (+.f64 a b)) (neg.f64 (+.f64 a b))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (+.f64 a b)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (+.f64 a b)) (neg.f64 (+.f64 a b)) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (+.f64 a b))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (neg.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 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (neg.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 (+.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 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (+.f64 a b) (+.f64 a b) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 b a))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 b a))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(cos.f64 (+.f64 b a))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 b a)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (neg.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 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (neg.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 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.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 (sin.f64 b) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* b (/ r (cos a))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ r (cos a)) (/.f64 r (cos.f64 a)))
#s(approx r r)
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b (*.f64 r (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 r (+.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 a) r) (pow (cos a) 2)) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin a) r) (*.f64 r (sin.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* b (/ r (cos a))) (*.f64 b r))
#s(approx (* b (/ r (cos a))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 b r)) (*.f64 b r)))
#s(approx (* b (/ r (cos a))) (fma.f64 b r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (* b (/ r (cos a))) (fma.f64 b r (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 b r) (fma.f64 #s(literal 1/48 binary64) (*.f64 b r) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ r (cos a)) r)
#s(approx (/ r (cos a)) (+.f64 r (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) r))))
#s(approx (/ r (cos a)) (+.f64 r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (/ r (cos a)) (+.f64 r (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a (*.f64 b r)) (*.f64 (*.f64 b b) r)) (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 b r) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (*.f64 b r)))))) (*.f64 (*.f64 b b) r)) (*.f64 b r)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a r) (*.f64 b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (*.f64 b r)))) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 b r)))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (*.f64 a r))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* (sin a) r) (pow (cos a) 2)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/120 binary64) r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (*.f64 #s(literal 1/3 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (* (sin a) r) (*.f64 a r))
#s(approx (* (sin a) r) (*.f64 a (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) r)))))
#s(approx (* (sin a) r) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) r)))))))
#s(approx (* (sin a) r) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (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 (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 (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (-.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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) b)
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a b) (*.f64 b b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) b (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal -1 binary64) b))))) (*.f64 b b)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(literal 1 binary64))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) a)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a (+.f64 b (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal -1 binary64) b)))))))))
#s(approx (/ (sin a) (pow (cos a) 2)) a)
#s(approx (/ (sin a) (pow (cos a) 2)) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 5/6 binary64) (*.f64 a a)))))
#s(approx (/ (sin a) (pow (cos a) 2)) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 5/6 binary64) (*.f64 #s(literal 61/120 binary64) (*.f64 a a)))))))
#s(approx (/ (sin a) (pow (cos a) 2)) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 5/6 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 61/120 binary64) (*.f64 #s(literal 277/1008 binary64) (*.f64 a a)))))))))
#s(approx (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 (/ b (cos a)) b)
#s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b)))) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) b (fma.f64 #s(literal 1/48 binary64) b (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b))))))) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b)))) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (tan.f64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan 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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) b)
#s(approx (/ (- (* a a) (* b b)) (- a b)) (+.f64 a b))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (*.f64 #s(literal 1/4 binary64) (*.f64 b b))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) a (*.f64 #s(literal 1/4 binary64) b))) #s(literal 1 binary64)))))
#s(approx (* (* (cos a) b) -1/2) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (* (* (cos a) b) -1/2) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* (* (cos a) b) -1/2) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/4 binary64) b)))))
#s(approx (* (* (cos a) b) -1/2) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/4 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/48 binary64) b (*.f64 #s(literal 1/1440 binary64) (*.f64 (*.f64 a a) b))))))))
#s(approx (* (cos a) b) b)
#s(approx (* (cos a) b) (+.f64 b (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* (cos a) b) (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* (cos a) b) (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/24 binary64) b)))))))
#s(approx (* (+ (/ b a) 1) a) b)
#s(approx (* (+ (/ b a) 1) a) (+.f64 a b))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a))
#s(approx (/ b a) (/.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 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 (-.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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) b)
#s(approx (/ (- (* a a) (* b b)) (- a b)) (+.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
#s(approx (- (* a a) (* b b)) (-.f64 (*.f64 a a) (*.f64 b b)))
#s(approx (* a a) (*.f64 a a))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- a b) (-.f64 a b))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 a (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) b))
#s(approx (neg (+ a b)) (-.f64 (*.f64 #s(literal -1 binary64) a) b))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.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)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.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)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#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 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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 (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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)))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#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 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#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 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/144 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/240 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))))))))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (tan.f64 b))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (sin a) (sin.f64 a))
#s(approx (pow (cos a) 2) (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 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (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 (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (/ (sin a) (pow (cos a) 2)) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (cos a) -1) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (/ b (cos a)) (/.f64 b (cos.f64 a)))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (+.f64 a b)))
#s(approx (/ (- (* a a) (* b b)) (- a b)) a)
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos 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 a) b) -1/2) (sin a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
#s(approx (* (* (cos a) b) -1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (* (cos a) b) (*.f64 b (cos.f64 a)))
#s(approx (* (+ (/ b a) 1) a) a)
#s(approx (* (+ (/ b a) 1) a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 #s(literal 1 binary64) (/.f64 b 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 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (+.f64 a b)))
#s(approx (/ (- (* a a) (* b b)) (- a b)) a)
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (- (* a a) (* b b)) (*.f64 a a))
#s(approx (- (* a a) (* b b)) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (- a b) a)
#s(approx (- a b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) a))
#s(approx (neg (+ a b)) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b 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 (sin.f64 b) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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)))))) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a) (/.f64 b a)))))
#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 (* (sin b) (sin a)) (*.f64 (sin.f64 a) (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))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) 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 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 #s(literal -1 binary64) (*.f64 a (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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) 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 (sin.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.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)))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (/.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)) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) 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 (sin.f64 b) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx b b)
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.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 (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (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 (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (/.f64 b (cos.f64 a)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) b)
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 b (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 a b)))))))))
#s(approx (pow (tan b) 2) (*.f64 b b))
#s(approx (pow (tan b) 2) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b)))))
#s(approx (pow (tan b) 2) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 17/45 binary64) (*.f64 b b)))))))
#s(approx (pow (tan b) 2) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 17/45 binary64) (*.f64 #s(literal 62/315 binary64) (*.f64 b b)))))))))
#s(approx (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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) b)
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (+ (* (* b b) -1/6) 1) #s(literal 1 binary64))
#s(approx (+ (* (* b b) -1/6) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))
#s(approx (* b b) (*.f64 b b))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (cos.f64 a))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (cos.f64 a))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (- (* a a) (* b b)) (fma.f64 #s(literal -1 binary64) (*.f64 b b) (*.f64 a a)))
#s(approx (- a b) (+.f64 a (*.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) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (*.f64 b (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)) (/.f64 (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))
#s(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 (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))
#s(approx (neg (+ a b)) (-.f64 (*.f64 #s(literal -1 binary64) 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 b r) (sin.f64 (+.f64 a (*.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 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (+.f64 a (*.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 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.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 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#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 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#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 #s(literal -1 binary64) (/.f64 (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #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 (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #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 (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #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)))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#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 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#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 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#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 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 b b) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 b b) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (/ 1 (pow (sin b) -1)) (*.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 (/ 1 (pow (sin b) -1)) (*.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 (pow (sin b) -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 b b))))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 b b))))))) b))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) r)))))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (/.f64 (*.f64 (*.f64 b b) (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 (*.f64 b b) (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (tan b) (tan.f64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (/.f64 (*.f64 (*.f64 b b) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (*.f64 (*.f64 b b) (+.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))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (*.f64 b (+.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))))))
#s(approx (pow (tan b) 2) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (sin b) (sin.f64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 (*.f64 b b) (-.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (/.f64 (cos.f64 a) (*.f64 b b))) (/.f64 (sin.f64 a) b))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (- (* a a) (* b b)) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 a a) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (- a b) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (neg (+ a b)) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64))))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (cos b) (cos.f64 b))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (pow (sin b) -1) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 b (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
#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 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.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))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 a) (/.f64 (sin.f64 a) b)))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) 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 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.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)))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) 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 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))

eval252.0ms (2%)

Memory
-9.5MiB live, 361.0MiB allocated; 49ms collecting garbage
Compiler

Compiled 59 238 to 5 892 computations (90.1% saved)

prune86.0ms (0.7%)

Memory
2.0MiB live, 141.5MiB allocated; 9ms collecting garbage
Pruning

72 alts after pruning (65 fresh and 7 done)

PrunedKeptTotal
New1 315651 380
Fresh000
Picked13720
Done000
Total1 328721 400
Accuracy
100.0%
Counts
1 400 → 72
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶77.8%
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.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.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
▶55.9%
(/.f64 (*.f64 (sin.f64 b) r) #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))))))
▶57.4%
(/.f64 (*.f64 (sin.f64 b) r) #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)))
▶58.0%
(/.f64 (*.f64 (sin.f64 b) r) #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)))
▶99.5%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶57.4%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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 b))))
▶78.0%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 (+.f64 a b))))
▶53.8%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b))))
▶99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶99.5%
(*.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))))))))
▶89.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)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
▶99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
▶61.1%
(*.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))) #s(approx (+ (* (* (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))))))
▶99.5%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
✓99.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶66.9%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
▶54.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶54.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶54.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶58.5%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶59.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶32.8%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))))
▶7.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
▶14.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
▶8.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
▶15.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
▶32.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
▶20.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b)))))
▶43.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
▶43.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
▶59.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))))
✓57.4%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
✓58.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
▶39.3%
(*.f64 r (/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
▶54.4%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
▶33.3%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
▶36.8%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
▶53.8%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶54.2%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))))
▶53.4%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
▶53.7%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
▶54.6%
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
▶56.8%
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
▶32.9%
(*.f64 r (/.f64 #s(approx (sin b) 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))))
▶33.4%
(*.f64 r #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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
✓55.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
✓53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
▶31.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
▶31.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
▶53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
▶31.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
▶29.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
✓57.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
▶25.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
▶32.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
▶31.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
▶54.2%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
▶31.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
▶32.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
▶32.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
▶32.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
▶53.4%
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
▶99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
▶37.9%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
▶38.5%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
▶31.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
▶41.1%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b))
✓53.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
▶31.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
▶31.5%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
▶31.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
Compiler

Compiled 2 674 to 1 479 computations (44.7% saved)

series837.0ms (6.6%)

Memory
18.1MiB live, 1 106.8MiB allocated; 145ms collecting garbage
Counts
409 → 1 739
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r)))
(fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))
a
(*.f64 (*.f64 b b) r)
(*.f64 b b)
b
r
(*.f64 b r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 r #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 #s(literal -1/2 binary64) (*.f64 a a))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
#s(literal -1/2 binary64)
(*.f64 a a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 b (/.f64 r #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)))))))
(/.f64 r #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 (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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
#s(literal 1/24 binary64)
(*.f64 #s(literal -1/720 binary64) (*.f64 a a))
#s(literal -1/720 binary64)
#s(literal 1/2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 r (*.f64 b (cos.f64 a)))
(*.f64 b (cos.f64 a))
(cos.f64 a)
(/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 r (sin.f64 a))
(sin.f64 a)
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r))))
(+.f64 r (*.f64 a (*.f64 b r)))
(*.f64 a (*.f64 b r))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r (sin.f64 b))
(sin.f64 b)
(sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(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 (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 b (*.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))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 (*.f64 b r) (cos.f64 a))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
#s(approx (/ (sin b) (cos (+ a 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 #s(literal 1/3 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
(*.f64 #s(literal 1/3 binary64) (*.f64 b b))
#s(literal 1/3 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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 (/ (sin b) (cos (+ a 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 #s(literal 2/15 binary64) (*.f64 b 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))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))
(*.f64 #s(literal 2/15 binary64) (*.f64 b b))
#s(literal 2/15 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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) (cos (+ a 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 (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)))))))))
(*.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))))))))
(+.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)))))))
(*.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))))))
(+.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)))))
(*.f64 (*.f64 b b) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b))))
(+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))
(*.f64 #s(literal 17/315 binary64) (*.f64 b b))
#s(literal 17/315 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))
(+.f64 b (*.f64 a (*.f64 b b)))
(*.f64 a (*.f64 b b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
(*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))
(*.f64 a (cos.f64 b))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))
(+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))
(*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))
(+.f64 a (*.f64 #s(literal 1/3 binary64) b))
(*.f64 #s(literal 1/3 binary64) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b))
#s(approx (/ b (cos a)) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
(+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))
(*.f64 (*.f64 a a) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64))))
(tan.f64 (+.f64 b (PI.f64)))
(+.f64 b (PI.f64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
(+.f64 #s(literal 1 binary64) (*.f64 a b))
(*.f64 a b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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 (/ (sin b) (cos (+ a b))) (/.f64 b #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)))))))
(/.f64 b #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 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 a a))
(*.f64 r #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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)
(*.f64 r (/.f64 #s(approx (sin b) 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))))
(/.f64 #s(approx (sin b) 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 (sin b) 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))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 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 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))
(*.f64 b (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))
(*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))
#s(literal 1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))))
#s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))))
#s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/2 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
(fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))
(-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a))
(*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64))
#s(approx (* (cos a) b) b)
(*.f64 r (/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
(/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))
(+.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)
#s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))))
(*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))
(+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))
(pow.f64 a #s(literal -1 binary64))
(pow.f64 b #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))
(*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)
#s(approx (+ (/ b a) 1) (/.f64 b a))
(/.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))))
(cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))
(/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b))
(-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 (log.f64 b) #s(literal 2 binary64))
(log.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))
(-.f64 (*.f64 a a) (*.f64 b b))
#s(approx (- a b) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))
(*.f64 #s(literal -1 binary64) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))
(*.f64 #s(literal -1 binary64) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))
(/.f64 (PI.f64) b)
(/.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/720 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))
(*.f64 (cos.f64 b) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(pow.f64 (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 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.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))) #s(approx (+ (* (* (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)))))
(/.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))) #s(approx (+ (* (* (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))))) (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))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 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))))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
(*.f64 #s(literal 1/6 binary64) (*.f64 b b))
(cos.f64 (+.f64 a b))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 (+.f64 a b))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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 b))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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 b)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(*.f64 (sin.f64 b) r)
#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))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(/.f64 (*.f64 (sin.f64 b) r) #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))))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.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 (neg.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 (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.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 (PI.f64) #s(literal 2 binary64)))
Outputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* r (+ b (* a (pow b 2))))))
#s(approx (* (* b b) r) #s(hole binary64 (* (pow b 2) r)))
#s(approx r #s(hole binary64 r))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (* r (sin a)) #s(hole binary64 (* r (sin a))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* r (+ 1 (* a b)))))
#s(approx (* a (* b r)) #s(hole binary64 (* a (* b r))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b))))))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (neg (+ a b)))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a))))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* r (+ (* -1 b) (* -1 (* a (pow b 2))))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a)))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* r (- (* -1 (* a b)) 1)))))
#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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx a #s(hole binary64 a))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (* -1/2 (* a a)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2))))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (+ 1/24 (* -1/720 (pow a 2)))))
#s(approx (* -1/720 (* a a)) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 r))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* a (+ (* 1/2 r) (* a (* b (- (* -1/6 r) (* -1 r)))))) (* b r))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* 1/2 (/ (* a r) b)))) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* a (- (* a (- (* -1/6 r) (* -1 r))) (* -1/2 (/ r b)))))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r b)))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) r) b)) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (/ r b)) (+ (* 1/48 (/ r b)) (* 1/2 (+ (* -1/4 (/ r b)) (* 1/24 (/ r b)))))))) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (* b (cos a)) #s(hole binary64 b))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 b))))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a r)))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* r (sin a)) #s(hole binary64 (* a r)))
#s(approx (* r (sin a)) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* r (sin a)) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* r (sin a)) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (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 (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 (+ r (* a (* b r))) #s(hole binary64 r))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos 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)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (* (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 (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (* (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)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (* b r)))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* 1/2 (* a b)) (pow b 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* a (+ (* 1/2 b) (* a (* b (- (* -1/6 b) (* -1 b)))))) (pow b 2))))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 b))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* a (* b b)) #s(hole binary64 (* a (pow b 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))) a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (* a (cos b)) #s(hole binary64 (* a (cos b))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (+ (* a (pow b 2)) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a b)))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (+ (* 1/3 (pow b 2)) (* a b))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* 1/3 b)))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (+ a (* 1/3 b))))
#s(approx (/ b (cos a)) #s(hole binary64 b))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 b) (+ (* 1/48 b) (* 1/2 (+ (* -1/4 b) (* 1/24 b))))))) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (* 1/2 (* (* a a) b)) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (* (* a a) b) #s(hole binary64 (* (pow a 2) b)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 1))
#s(approx (+ 1 (* a b)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (* a b) #s(hole binary64 (* a b)))
#s(approx (pow (cos a) -1) #s(hole binary64 1))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (* 1/24 (* a a)) #s(hole binary64 (* 1/24 (pow 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 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 (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (/ b (sin (* 1/2 (PI))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (+ (/ b (sin (* 1/2 (PI)))) (/ (* a (* b (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* b (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ b (sin (* 1/2 (PI)))))))) (* -1 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))))) (/ b (sin (* 1/2 (PI)))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/6 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (cos (* 1/2 (PI))) (+ (* -1 (/ (* b (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ b (sin (* 1/2 (PI))))))) (sin (* 1/2 (PI)))))))) (+ (* -1 (/ (* b (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ b (sin (* 1/2 (PI)))))))) (* -1 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))))) (/ b (sin (* 1/2 (PI)))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* a (cos (* 1/2 (PI))))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* a (sin (* 1/2 (PI))))))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* a (cos (* 1/2 (PI))))))))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 1))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* 1/6 (* (pow a 2) b))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* -1/120 (* (pow a 2) b)) (* 1/6 b)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* 1/6 b) (* (pow a 2) (+ (* -1/120 b) (* 1/5040 (* (pow a 2) b))))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a b)))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* -1/6 (* (pow a 2) b))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* 1/120 (* (pow a 2) b))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) b)) (* 1/120 b)))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1 (* a b)) (* -1/2 (pow b 2)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* 1/4 (* a (pow b 2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (+ (* 1/6 (* a b)) (* 1/4 (pow b 2)))))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 b)))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* 1/4 (* a (pow b 2))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2))))))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/6 (pow b 2)) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* 1/4 (* a b))) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* a (+ (* 1/4 b) (* a (+ 1/6 (* -1/36 (pow b 2))))))) 1)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 b)))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* 1/6 (* a (pow b 2))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* 1/4 (* a b)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* a (+ (* -1/36 (* a (pow b 2))) (* 1/4 b))))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* 1/4 a))) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* a (+ 1/4 (* -1/36 (* a b)))))) 1/2)))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* a (+ (* -1/36 (* (pow a 2) b)) (* 1/6 b)))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* a (+ (* 1/6 b) (* (pow a 2) (+ (* -1/36 b) (* 1/720 (* (pow a 2) b))))))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* a (+ (* 1/6 b) (* (pow a 2) (+ (* -1/36 b) (* (pow a 2) (+ (* -1/30240 (* (pow a 2) b)) (* 1/720 b)))))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (cos (+ a 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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 1))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 b)))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (* (cos a) b) #s(hole binary64 b))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 b))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ b a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ (+ a b) a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (pow a -1) #s(hole binary64 (/ 1 a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (sin b) (sin (- (* 1/2 (PI)) b))) (/ (* a (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (* -1 a) #s(hole binary64 (* -1 a)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* b (+ 1 (* 1/2 (/ (PI) b)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (+ (* 1/2 (/ (PI) b)) (/ a b))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#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 (* (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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b))))))) (pow (cos b) 6)) (/ (* r (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 7)))))) (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b)))))) (pow (cos b) 6)) (/ (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 7)))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -3/2 (cos b)) (* -1 (cos b))) (* -2 (cos b)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -3/2 (cos b)) (+ (* -1 (cos b)) (* a (- (+ (* -1 (/ (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (* 3/2 (sin b)))) (+ (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (* -1 (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4)))))))) (* -2 (cos b)))))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -2 (pow (cos b) 2)) (* a (- (* -2 (/ (pow (sin b) 3) (cos b))) (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (* (sin b) (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (cos b))))))) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (* a (* (cos b) (pow (sin b) 3)))) (* -2 (pow (cos b) 4))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (pow (cos b) 4)) (* a (- (* a (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* 2 (* (cos b) (pow (sin b) 3)))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* a (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* -1 (pow (cos b) 2))) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (- (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (/ (pow (sin b) 3) (cos b)))) (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (- (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (/ (pow (sin b) 3) (cos b)))) (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1 (/ (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))) (cos b))) (+ (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)) (/ (pow (sin b) 3) (pow (cos b) 2)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (- (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (/ (pow (sin b) 3) (cos b)))) (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (cos b) (sin b)))))) (pow (sin b) 2)))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (- (* a (- (* -1 (/ (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (cos b) (sin b)))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* -1 (pow (sin b) 2)))) (* (cos b) (sin b))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1 (/ (* (sin b) (- (* -1 (/ (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (cos b) (sin b)))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (cos b))) (+ (* 1/3 (pow (sin b) 2)) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (cos b)))))) (* -1 (/ (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* -1 (pow (sin b) 2)))) (* (cos b) (sin b))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* (pow a 2) (- (* -2/3 (pow (sin b) 4)) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -2/3 (pow (sin b) 4)) (* (pow a 2) (- (* 1/5 (pow (sin b) 4)) (+ (* -1/9 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -4/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/315 (* (pow (cos b) 2) (pow (sin b) 2)))))))) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (pow (sin b) 4))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (+ (* -2/3 (* (pow a 2) (pow (sin b) 4))) (pow (sin b) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* -2/3 (pow (sin b) 4)) (* 1/5 (* (pow a 2) (pow (sin b) 4))))) (pow (sin b) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* -2/3 (pow (sin b) 4)) (* (pow a 2) (+ (* -34/945 (* (pow a 2) (pow (sin b) 4))) (* 1/5 (pow (sin b) 4)))))) (pow (sin b) 4)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow a 2) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2)))))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow a 2) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow a 2) (+ (* -1/9 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -4/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/315 (* (pow (cos b) 2) (pow (sin b) 2)))))))))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* -1 (* a (* (cos b) (sin b))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (- (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (- (* a (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (- (* a (+ (* a (- (* -1/3 (* a (pow (sin b) 2))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (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 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* -1/3 (pow a 2))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* 2/45 (pow a 2)) 1/3))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/45 (* -1/315 (pow a 2)))) 1/3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (neg b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI))))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))) (/ (* r (* (sin b) (+ (* 1/6 (* (cos (neg 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 (neg b)))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (+ (* (sin (neg (+ 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 (neg b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b)))) (* a (+ (* 1/6 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI))))))))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg b))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* -1 (* a (cos (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* -1/2 (* a (sin (neg b)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* a (+ (* -1/2 (sin (neg b))) (* 1/6 (* a (cos (neg b)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow a 2)) 1/2))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (+ (* 1/24 (/ 1 (pow a 2))) (/ 1 (pow a 6))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* (pow a 2) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (* b (cos a)) #s(hole binary64 (* b (cos a))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (* b r))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (+ (* b r) (/ r a)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 a))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* a (pow b 2))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* a (+ (/ b a) (pow b 2)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* a (pow b 2))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* a (+ (/ (* b (+ 1 (* 1/3 (pow b 2)))) a) (pow b 2)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* a b)))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* a (+ b (+ (* 1/3 (/ (pow b 2) a)) (/ 1 a))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* a b)))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* a (+ b (* 1/3 (/ (pow b 2) a))))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 a))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* a (+ 1 (* 1/3 (/ b a))))))
#s(approx (/ b (cos a)) #s(hole binary64 (/ b (cos a))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 b) (/ b (pow a 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a b)))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a (+ b (/ 1 a)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- (+ 1/24 (/ 1 (pow a 4))) (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* (pow a 2) (- 1/24 (* 1/2 (/ 1 (pow 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 (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (- (* -1/2 (* b (cos a))) (sin a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* 1/6 (* b (sin a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (* (cos a) b) #s(hole binary64 (* b (cos a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 1))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 a))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* a (+ 1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (/ a b)))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (/ 1 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 (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 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)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b)))))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b)))))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (- (* (pow (sin a) 4) (pow (sin b) 4)) (* (pow (cos a) 2) (* (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b))))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (- (* (pow (sin a) 4) (pow (sin b) 4)) (* (pow (cos a) 2) (* (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow (sin a) 4) (pow (sin b) 4))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow (cos a) 2) (* (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b)))))))
#s(approx (/ (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 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (neg (+ a b)))) (* (cos (+ a b)) (sin (* 1/2 (PI)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg (+ a b)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* a (+ (* -1 (* b r)) (* -1 (/ r a)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (/ (* (sin b) r) (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 (+ b (* a (* b b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* -1 (pow b 2)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* b (+ 1 (* 1/3 (pow b 2)))) a)) (* -1 (pow b 2)))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* -1 (* a (+ (* -1 b) (* -1 (/ (+ 1 (* 1/3 (pow b 2))) a)))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* -1 (* a (+ (* -1 b) (* -1/3 (/ (pow b 2) a)))))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* -1 (* a (- (* -1/3 (/ b a)) 1)))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* a (- (* -1 b) (/ 1 a))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (/ b (sin (+ (* -1 a) (* 1/2 (PI)))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (sin (+ (* -1 a) (* 1/2 (PI))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* -1 (* a (- (* -1/2 (/ (PI) (* a b))) (/ 1 b))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 a) b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))) 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 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* b r) (sin (* 1/2 (PI))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (cos (* 1/2 (PI))) (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI)))))))) (* -1/6 (/ r (sin (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (* (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)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (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 (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 (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (* 1/3 (* b b)) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 1/3))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 (+ 1/3 (* 2/15 (pow b 2)))))
#s(approx (* 2/15 (* b b)) #s(hole binary64 (* 2/15 (pow b 2))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2)))))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 1/3))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (+ 1/3 (* 2/15 (pow b 2)))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2)))))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* 2/15 (pow b 2))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 2/15))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 (+ 2/15 (* 17/315 (pow b 2)))))
#s(approx (* 17/315 (* b b)) #s(hole binary64 (* 17/315 (pow b 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 b))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ b (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* 1/3 (/ b a)))) (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* b (+ (* 2/3 b) (* 1/3 (/ 1 a)))))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ b a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* 1/3 (/ (pow b 2) a)) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (pow b 2) a)) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 17/315 (/ (pow b 2) a)) (* 2/15 (/ 1 a)))) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (* a (cos b)) #s(hole binary64 a))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (pow b 2)))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 1))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (* b (+ a (* 1/3 b))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* b (+ a (* 1/3 b)))))
#s(approx (* 1/3 b) #s(hole binary64 (* 1/3 b)))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* b (+ 1 (* 1/2 (pow a 2))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ 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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1/2 (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (cos (+ a 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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (cos a)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (* -1/2 (* b b)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (pow b -1) #s(hole binary64 (/ 1 b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (* -1 (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (exp (* (log b) 2)) #s(hole binary64 (pow b 2)))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (log b))))
#s(approx (log b) #s(hole binary64 (log b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ 1 (sin (- (* 1/2 (PI)) a))) (/ (* b (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (* -1 b) #s(hole binary64 (* -1 b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (* 1/2 (PI))) b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (+ b (* 1/2 (PI)))) b)))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (/ (+ a (* 1/2 (PI))) b)))
#s(approx (/ (PI) b) #s(hole binary64 (/ (PI) b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (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 (- (* (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 (* (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 (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (* 1/24 (* b b)) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2))))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (+ 1/24 (* -1/720 (pow b 2)))))
#s(approx (* -1/720 (* b b)) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (cos b) 3) #s(hole binary64 1))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (* -2 (/ (* r (pow (sin a) 3)) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 7)) (/ (* r (+ (* -1 (* (pow (cos a) 2) (pow (sin a) 3))) (+ (* -1 (* (pow (cos a) 4) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 3/2 (* (pow (cos a) 4) (sin a)))))) (pow (cos a) 6)))))) (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/3 (/ 1 (cos a))) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 7))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -3/2 (cos a)) (* -1 (cos a))) (* -2 (cos a)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -3/2 (cos a)) (+ (* -1 (cos a)) (* b (- (+ (* -1 (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (* 3/2 (sin a)))) (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* -1 (/ (* (sin a) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))))) (* -2 (cos a)))))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -2 (pow (cos a) 2)) (* b (- (* -2 (/ (pow (sin a) 3) (cos a))) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (* (sin a) (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (/ (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (cos a))))))) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (* -2 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* b (- (* b (- (* 5/3 (pow (cos a) 4)) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* 2 (* (cos a) (pow (sin a) 3)))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos a) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* b (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (* -1 (pow (cos a) 2))) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (- (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (+ (* -1/6 (* (cos a) (sin a))) (/ (pow (sin a) 3) (cos a))))) (* -1 (/ (* (cos a) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))) (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1/6 (/ (sin a) (pow (cos a) 2))) (/ (pow (sin a) 3) (pow (cos a) 4)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))) (* (pow (cos a) 2) (sin 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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))) (sin a))) (+ (* -1 (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)) (/ (pow (sin a) 3) (pow (cos a) 2)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (- (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (/ (pow (sin a) 3) (cos a)))) (* -1 (/ (* (cos a) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))) (sin a))))) (pow (sin a) 2)))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1 (/ (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (cos a) (sin a)))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* -1 (pow (sin a) 2)))) (* (cos a) (sin a))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1 (/ (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (cos a) (sin a)))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (cos a))) (+ (* 1/3 (pow (sin a) 2)) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* -1 (/ (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (cos a) (sin a))))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* -1 (pow (sin a) 2)))) (* (cos a) (sin a))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* -1 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (+ (* (pow b 2) (- (* -2/3 (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* -2/3 (pow (sin a) 4)) (* (pow b 2) (- (* 1/5 (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1/9 (pow (sin a) 2)) (+ (* -4/45 (pow (sin a) 2)) (* -1/315 (pow (sin a) 2)))))))) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (pow (sin a) 4))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (+ (* -2/3 (* (pow b 2) (pow (sin a) 4))) (pow (sin a) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* -2/3 (pow (sin a) 4)) (* 1/5 (* (pow b 2) (pow (sin a) 4))))) (pow (sin a) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* -2/3 (pow (sin a) 4)) (* (pow b 2) (+ (* -34/945 (* (pow b 2) (pow (sin a) 4))) (* 1/5 (pow (sin a) 4)))))) (pow (sin a) 4)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 2) (+ (* -1/9 (pow (sin a) 2)) (+ (* -4/45 (pow (sin a) 2)) (* -1/315 (pow (sin a) 2)))))) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* -1 (* b (* (cos a) (sin a))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (- (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (- (* b (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (- (* b (+ (* b (- (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (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 (+ (* (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (+ 1 (* 1/6 (pow b 2)))))
#s(approx (* 1/6 (* b b)) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) #s(hole binary64 b))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (neg a)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (neg a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (+ (/ (* r (+ (* 1/6 (* (cos (neg 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 (neg a)))) 2)) (/ (* (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a))))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (+ (* (sin (neg (+ 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 (neg a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))) (* b (+ (* 1/6 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg a))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* -1 (* b (cos (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* -1/2 (* b (sin (neg a)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* b (+ (* -1/2 (sin (neg a))) (* 1/6 (* b (cos (neg a)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) 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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* b (+ (* a r) (/ r b)))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 b))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 (* 1/3 (pow b 3))))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 (* (pow b 3) (+ 1/3 (/ 1 (pow b 2))))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ 1 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* 2/15 (pow b 5))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* (pow b 5) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* (pow b 5) (+ 2/15 (+ (* 1/3 (/ 1 (pow b 2))) (/ 1 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (* 2/15 (pow b 4))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 2/15 (+ (* 1/3 (/ 1 (pow b 2))) (/ 1 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* 2/15 (pow b 4))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* (pow b 4) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 (* 2/15 (pow b 2))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 (* (pow b 2) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* 17/315 (pow b 7))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* (pow b 7) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* (pow b 7) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* (pow b 7) (+ 17/315 (+ (/ 1/3 (pow b 4)) (+ (* 2/15 (/ 1 (pow b 2))) (/ 1 (pow b 6))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* 17/315 (pow b 6))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (+ (/ 1/3 (pow b 4)) (+ (* 2/15 (/ 1 (pow b 2))) (/ 1 (pow b 6))))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* 17/315 (pow b 6))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (* 17/315 (pow b 4))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* 17/315 (pow b 4))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* (pow b 4) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 (* 17/315 (pow b 2))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 (* (pow b 2) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ (* (pow b 2) (sin a)) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 2) (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* (pow b 2) (+ a (/ 1 b)))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* 1/3 (pow b 3))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* (pow b 3) (+ 1/3 (/ a b)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* (pow b 3) (+ 1/3 (+ (/ 1 (pow b 2)) (/ a b))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ a b)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (+ (/ 1 (pow b 2)) (/ a b))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ a b)))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* b (+ 1/3 (/ a b)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (+ b (PI))) (cos (+ b (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) b)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ (* b (sin a)) (pow (cos a) 2))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* b (+ a (/ 1 b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (cos a) b)) (+ (* 1/6 (sin a)) (/ (cos a) (pow b 3)))) (/ (sin a) (pow b 2))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* 1/6 (* b (sin a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/2))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (* (log b) 2) #s(hole binary64 (* -2 (log (/ 1 b)))))
#s(approx (log b) #s(hole binary64 (* -1 (log (/ 1 b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- (+ 1/24 (/ 1 (pow b 4))) (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* (pow b 2) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (+ (* 1/24 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (pow (cos b) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* 1/6 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* b (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* (pow b 2) (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (sin b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 (sin b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* b (+ (* -1 (* a r)) (* -1 (/ r b)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* -1 (* (pow b 5) (- (* -1 (/ (+ 1/3 (/ 1 (pow b 2))) (pow b 2))) 2/15)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* -1 (* (pow b 7) (- (* -1 (/ (+ 2/15 (* 1/3 (/ 1 (pow b 2)))) (pow b 2))) 17/315)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* -1 (* (pow b 7) (- (* -1 (/ (+ 1/3 (/ 1 (pow b 2))) (pow b 4))) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1 (/ a b)) 1/3)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1 (/ (+ a (/ 1 b)) b)) 1/3)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* -1 (/ (- (* -1 a) (/ 1 b)) b))))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1/3)))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* -1 (* b (- (* -1/2 (pow a 2)) 1)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (- (PI) (* -1 b))) (cos (- (PI) (* -1 b))))))
#s(approx (+ b (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* b (- (* -1 a) (/ 1 b))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (* 1/2 (cos a)) (/ (sin a) b)) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 b)))))))
#s(approx (log b) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ a b)) (* -1/2 (/ (PI) b))) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 a) (* -1/2 (PI))) b)))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* -1 (/ (+ (* -1 a) (* -1/2 (PI))) b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 b) a))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))
Calls

9 calls:

TimeVariablePointExpression
201.0ms
b
@-inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) a (* (* b b) r) (* b b) b r (* b r) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) 1 (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) 1/24 (* -1/720 (* a a)) -1/720 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (/ (* r (sin a)) (pow (cos a) 2)) (* r (sin a)) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin b) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 1/2 (PI)))) (+ b (* 1/2 (PI))) (* 1/2 (PI)) (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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (cos b) (* (sin a) (sin b)) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (/ (* (sin b) r) (cos (+ a b))) (/ (* b r) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* 1/3 (* b b)))) (+ 1 (* 1/3 (* b b))) (* 1/3 (* b b)) 1/3 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (+ 1/3 (* 2/15 (* b b))) (* 2/15 (* b b)) 2/15 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (+ 2/15 (* 17/315 (* b b))) (* 17/315 (* b b)) 17/315 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ b (* a (* b b))) (* a (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (/ (pow (sin b) 2) (pow (cos b) 2)) (pow (sin b) 2) (pow (cos b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* b (+ 1 (* b (+ a (* 1/3 b))))) (+ 1 (* b (+ a (* 1/3 b)))) (* b (+ a (* 1/3 b))) (+ a (* 1/3 b)) (* 1/3 b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ b (sin (- (* 1/2 (PI)) a))) (sin (- (* 1/2 (PI)) a)) (- (* 1/2 (PI)) a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) -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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* 1/6 (* b (sin a))) 1/6 (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (sin (- (* 1/2 (PI)) (+ a b))) (- (* 1/2 (PI)) (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (pow b -1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (* b b)) (- a b) (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 a) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+ (* 1/2 (/ (PI) b)) (/ a b)) (/ (PI) b) (/ a b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (* 1/6 (* b b)) (cos (+ a b)) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (neg (+ a b))) (neg (+ a b)) (cos (/ (PI) 2)) (/ (PI) 2) (* (cos (+ a b)) (sin (/ (PI) 2))) (sin (/ (PI) 2)))
96.0ms
a
@0
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) a (* (* b b) r) (* b b) b r (* b r) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) 1 (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) 1/24 (* -1/720 (* a a)) -1/720 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (/ (* r (sin a)) (pow (cos a) 2)) (* r (sin a)) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin b) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 1/2 (PI)))) (+ b (* 1/2 (PI))) (* 1/2 (PI)) (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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (cos b) (* (sin a) (sin b)) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (/ (* (sin b) r) (cos (+ a b))) (/ (* b r) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* 1/3 (* b b)))) (+ 1 (* 1/3 (* b b))) (* 1/3 (* b b)) 1/3 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (+ 1/3 (* 2/15 (* b b))) (* 2/15 (* b b)) 2/15 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (+ 2/15 (* 17/315 (* b b))) (* 17/315 (* b b)) 17/315 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ b (* a (* b b))) (* a (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (/ (pow (sin b) 2) (pow (cos b) 2)) (pow (sin b) 2) (pow (cos b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* b (+ 1 (* b (+ a (* 1/3 b))))) (+ 1 (* b (+ a (* 1/3 b)))) (* b (+ a (* 1/3 b))) (+ a (* 1/3 b)) (* 1/3 b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ b (sin (- (* 1/2 (PI)) a))) (sin (- (* 1/2 (PI)) a)) (- (* 1/2 (PI)) a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) -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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* 1/6 (* b (sin a))) 1/6 (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (sin (- (* 1/2 (PI)) (+ a b))) (- (* 1/2 (PI)) (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (pow b -1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (* b b)) (- a b) (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 a) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+ (* 1/2 (/ (PI) b)) (/ a b)) (/ (PI) b) (/ a b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (* 1/6 (* b b)) (cos (+ a b)) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (neg (+ a b))) (neg (+ a b)) (cos (/ (PI) 2)) (/ (PI) 2) (* (cos (+ a b)) (sin (/ (PI) 2))) (sin (/ (PI) 2)))
89.0ms
b
@0
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) a (* (* b b) r) (* b b) b r (* b r) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) 1 (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) 1/24 (* -1/720 (* a a)) -1/720 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (/ (* r (sin a)) (pow (cos a) 2)) (* r (sin a)) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin b) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 1/2 (PI)))) (+ b (* 1/2 (PI))) (* 1/2 (PI)) (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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (cos b) (* (sin a) (sin b)) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (/ (* (sin b) r) (cos (+ a b))) (/ (* b r) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* 1/3 (* b b)))) (+ 1 (* 1/3 (* b b))) (* 1/3 (* b b)) 1/3 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (+ 1/3 (* 2/15 (* b b))) (* 2/15 (* b b)) 2/15 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (+ 2/15 (* 17/315 (* b b))) (* 17/315 (* b b)) 17/315 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ b (* a (* b b))) (* a (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (/ (pow (sin b) 2) (pow (cos b) 2)) (pow (sin b) 2) (pow (cos b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* b (+ 1 (* b (+ a (* 1/3 b))))) (+ 1 (* b (+ a (* 1/3 b)))) (* b (+ a (* 1/3 b))) (+ a (* 1/3 b)) (* 1/3 b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ b (sin (- (* 1/2 (PI)) a))) (sin (- (* 1/2 (PI)) a)) (- (* 1/2 (PI)) a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) -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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* 1/6 (* b (sin a))) 1/6 (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (sin (- (* 1/2 (PI)) (+ a b))) (- (* 1/2 (PI)) (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (pow b -1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (* b b)) (- a b) (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 a) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+ (* 1/2 (/ (PI) b)) (/ a b)) (/ (PI) b) (/ a b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (* 1/6 (* b b)) (cos (+ a b)) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (neg (+ a b))) (neg (+ a b)) (cos (/ (PI) 2)) (/ (PI) 2) (* (cos (+ a b)) (sin (/ (PI) 2))) (sin (/ (PI) 2)))
85.0ms
a
@-inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) a (* (* b b) r) (* b b) b r (* b r) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) 1 (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) 1/24 (* -1/720 (* a a)) -1/720 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (/ (* r (sin a)) (pow (cos a) 2)) (* r (sin a)) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin b) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 1/2 (PI)))) (+ b (* 1/2 (PI))) (* 1/2 (PI)) (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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (cos b) (* (sin a) (sin b)) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (/ (* (sin b) r) (cos (+ a b))) (/ (* b r) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* 1/3 (* b b)))) (+ 1 (* 1/3 (* b b))) (* 1/3 (* b b)) 1/3 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (+ 1/3 (* 2/15 (* b b))) (* 2/15 (* b b)) 2/15 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (+ 2/15 (* 17/315 (* b b))) (* 17/315 (* b b)) 17/315 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ b (* a (* b b))) (* a (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (/ (pow (sin b) 2) (pow (cos b) 2)) (pow (sin b) 2) (pow (cos b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* b (+ 1 (* b (+ a (* 1/3 b))))) (+ 1 (* b (+ a (* 1/3 b)))) (* b (+ a (* 1/3 b))) (+ a (* 1/3 b)) (* 1/3 b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ b (sin (- (* 1/2 (PI)) a))) (sin (- (* 1/2 (PI)) a)) (- (* 1/2 (PI)) a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) -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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* 1/6 (* b (sin a))) 1/6 (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (sin (- (* 1/2 (PI)) (+ a b))) (- (* 1/2 (PI)) (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (pow b -1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (* b b)) (- a b) (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 a) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+ (* 1/2 (/ (PI) b)) (/ a b)) (/ (PI) b) (/ a b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (* 1/6 (* b b)) (cos (+ a b)) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (neg (+ a b))) (neg (+ a b)) (cos (/ (PI) 2)) (/ (PI) 2) (* (cos (+ a b)) (sin (/ (PI) 2))) (sin (/ (PI) 2)))
77.0ms
b
@inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) a (* (* b b) r) (* b b) b r (* b r) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) 1 (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) 1/24 (* -1/720 (* a a)) -1/720 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (/ (* r (sin a)) (pow (cos a) 2)) (* r (sin a)) (sin a) (pow (cos a) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin b) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 1/2 (PI)))) (+ b (* 1/2 (PI))) (* 1/2 (PI)) (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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (cos b) (* (sin a) (sin b)) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (* (cos a) (cos b)) (pow (* (sin a) (sin b)) 2) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) 3 (pow (* (sin a) (sin b)) 3) (/ (* (sin b) r) (cos (+ a b))) (/ (* b r) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* 1/3 (* b b)))) (+ 1 (* 1/3 (* b b))) (* 1/3 (* b b)) 1/3 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (+ 1/3 (* 2/15 (* b b))) (* 2/15 (* b b)) 2/15 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (+ 2/15 (* 17/315 (* b b))) (* 17/315 (* b b)) 17/315 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ b (* a (* b b))) (* a (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (/ (pow (sin b) 2) (pow (cos b) 2)) (pow (sin b) 2) (pow (cos b) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* b (+ 1 (* b (+ a (* 1/3 b))))) (+ 1 (* b (+ a (* 1/3 b)))) (* b (+ a (* 1/3 b))) (+ a (* 1/3 b)) (* 1/3 b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow (cos a) -1) -1 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ b (sin (- (* 1/2 (PI)) a))) (sin (- (* 1/2 (PI)) a)) (- (* 1/2 (PI)) a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) -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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* 1/6 (* b (sin a))) 1/6 (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (- (* (* (cos a) b) -1/2) (sin a)) (* (* (cos a) b) -1/2) (* (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (sin (- (* 1/2 (PI)) (+ a b))) (- (* 1/2 (PI)) (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (pow b -1) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (* b b)) (- a b) (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (- a b) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 a) (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (* -1 b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+ (* 1/2 (/ (PI) b)) (/ a b)) (/ (PI) b) (/ a b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (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)))))) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (pow (sin a) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (* 1/6 (* b b)) (cos (+ a b)) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (neg (+ a b))) (neg (+ a b)) (cos (/ (PI) 2)) (/ (PI) 2) (* (cos (+ a b)) (sin (/ (PI) 2))) (sin (/ (PI) 2)))

rewrite714.0ms (5.6%)

Memory
-17.5MiB live, 1 279.2MiB allocated; 189ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0587484511
0656770697
01095768777
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
2 148 → 2 485
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r)))
(fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))
a
(*.f64 (*.f64 b b) r)
(*.f64 b b)
b
r
(*.f64 b r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 r #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 #s(literal -1/2 binary64) (*.f64 a a))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
#s(literal -1/2 binary64)
(*.f64 a a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 b (/.f64 r #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)))))))
(/.f64 r #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 (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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
#s(literal 1/24 binary64)
(*.f64 #s(literal -1/720 binary64) (*.f64 a a))
#s(literal -1/720 binary64)
#s(literal 1/2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 r (*.f64 b (cos.f64 a)))
(*.f64 b (cos.f64 a))
(cos.f64 a)
(/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 r (sin.f64 a))
(sin.f64 a)
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r))))
(+.f64 r (*.f64 a (*.f64 b r)))
(*.f64 a (*.f64 b r))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r (sin.f64 b))
(sin.f64 b)
(sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(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 (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 b (*.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))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 (*.f64 b r) (cos.f64 a))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
#s(approx (/ (sin b) (cos (+ a 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 #s(literal 1/3 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
(*.f64 #s(literal 1/3 binary64) (*.f64 b b))
#s(literal 1/3 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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 (/ (sin b) (cos (+ a 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 #s(literal 2/15 binary64) (*.f64 b 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))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))
(*.f64 #s(literal 2/15 binary64) (*.f64 b b))
#s(literal 2/15 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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) (cos (+ a 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 (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)))))))))
(*.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))))))))
(+.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)))))))
(*.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))))))
(+.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)))))
(*.f64 (*.f64 b b) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b))))
(+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))
(*.f64 #s(literal 17/315 binary64) (*.f64 b b))
#s(literal 17/315 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))
(+.f64 b (*.f64 a (*.f64 b b)))
(*.f64 a (*.f64 b b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
(*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))
(*.f64 a (cos.f64 b))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (sin.f64 b) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))
(+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))
(*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))
(+.f64 a (*.f64 #s(literal 1/3 binary64) b))
(*.f64 #s(literal 1/3 binary64) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b))
#s(approx (/ b (cos a)) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
(+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))
(*.f64 (*.f64 a a) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64))))
(tan.f64 (+.f64 b (PI.f64)))
(+.f64 b (PI.f64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
(+.f64 #s(literal 1 binary64) (*.f64 a b))
(*.f64 a b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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 (/ (sin b) (cos (+ a b))) (/.f64 b #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)))))))
(/.f64 b #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 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 a a))
(*.f64 r #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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)
(*.f64 r (/.f64 #s(approx (sin b) 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))))
(/.f64 #s(approx (sin b) 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 (sin b) 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))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 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 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))
(*.f64 b (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))
(*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))
#s(literal 1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))))
#s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))))
#s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/2 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
(fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))
(-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a))
(*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64))
#s(approx (* (cos a) b) b)
(*.f64 r (/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
(/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))
(+.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)
#s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))))
(*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))
(+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))
(pow.f64 a #s(literal -1 binary64))
(pow.f64 b #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))
(*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)
#s(approx (+ (/ b a) 1) (/.f64 b a))
(/.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))))
(cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))
(/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b))
(-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 (log.f64 b) #s(literal 2 binary64))
(log.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))
(-.f64 (*.f64 a a) (*.f64 b b))
#s(approx (- a b) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))
(*.f64 #s(literal -1 binary64) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))
(*.f64 #s(literal -1 binary64) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))
(/.f64 (PI.f64) b)
(/.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/720 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))
(*.f64 (cos.f64 b) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(pow.f64 (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 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.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))) #s(approx (+ (* (* (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)))))
(/.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))) #s(approx (+ (* (* (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))))) (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))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 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))))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
(*.f64 #s(literal 1/6 binary64) (*.f64 b b))
(cos.f64 (+.f64 a b))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 (+.f64 a b))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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 b))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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 b)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(*.f64 (sin.f64 b) r)
#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))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(/.f64 (*.f64 (sin.f64 b) r) #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))))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.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 (neg.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 (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.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 (PI.f64) #s(literal 2 binary64)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* r (+ b (* a (pow b 2))))))
#s(approx (* (* b b) r) #s(hole binary64 (* (pow b 2) r)))
#s(approx r #s(hole binary64 r))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (* r (sin a)) #s(hole binary64 (* r (sin a))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* r (+ 1 (* a b)))))
#s(approx (* a (* b r)) #s(hole binary64 (* a (* b r))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b))))))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (neg (+ a b)))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a))))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* r (+ (* -1 b) (* -1 (* a (pow b 2))))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a)))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* r (- (* -1 (* a b)) 1)))))
#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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx a #s(hole binary64 a))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (* -1/2 (* a a)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2))))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (+ 1/24 (* -1/720 (pow a 2)))))
#s(approx (* -1/720 (* a a)) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 r))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* a (+ (* 1/2 r) (* a (* b (- (* -1/6 r) (* -1 r)))))) (* b r))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* 1/2 (/ (* a r) b)))) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* a (- (* a (- (* -1/6 r) (* -1 r))) (* -1/2 (/ r b)))))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r b)))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) r) b)) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (/ r b)) (+ (* 1/48 (/ r b)) (* 1/2 (+ (* -1/4 (/ r b)) (* 1/24 (/ r b)))))))) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (* b (cos a)) #s(hole binary64 b))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 b))))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a r)))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) #s(hole binary64 (* a (+ r (* (pow a 2) (- (+ (* -1/6 r) (* (pow a 2) (- (+ (* 1/120 r) (* (pow a 2) (- (* -1/5040 r) (+ (* -1 (- (* 1/120 r) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r)))) (+ (* -2/45 r) (* 1/3 (- (* -1/6 r) (* -1 r)))))))) (+ (* -1 (- (* -1/6 r) (* -1 r))) (* 1/3 r))))) (* -1 r)))))))
#s(approx (* r (sin a)) #s(hole binary64 (* a r)))
#s(approx (* r (sin a)) #s(hole binary64 (* a (+ r (* -1/6 (* (pow a 2) r))))))
#s(approx (* r (sin a)) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* 1/120 (* (pow a 2) r))))))))
#s(approx (* r (sin a)) #s(hole binary64 (* a (+ r (* (pow a 2) (+ (* -1/6 r) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) r)) (* 1/120 r)))))))))
#s(approx (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 (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 (+ r (* a (* b r))) #s(hole binary64 r))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos 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)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (* (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 (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (* (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)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* -1/2 (* (pow a 2) (pow (sin b) 3))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* 13/120 (* (pow a 2) (pow (sin b) 3))))) (pow (sin b) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -1/2 (pow (sin b) 3)) (* (pow a 2) (+ (* -41/3024 (* (pow a 2) (pow (sin b) 3))) (* 13/120 (pow (sin b) 3)))))) (pow (sin b) 3)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (* b r)))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ (* b r) (cos a)) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* 1/2 (* a b)) (pow b 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* a (+ (* 1/2 b) (* a (* b (- (* -1/6 b) (* -1 b)))))) (pow b 2))))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 b))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* a (* b b)) #s(hole binary64 (* a (pow b 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))) a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (* a (cos b)) #s(hole binary64 (* a (cos b))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (+ (* a (pow b 2)) (* b (+ 1 (* 1/3 (pow b 2)))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow b 2)) (* a b)))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (+ (* 1/3 (pow b 2)) (* a b))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* 1/3 b)))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (+ a (* 1/3 b))))
#s(approx (/ b (cos a)) #s(hole binary64 b))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 b) (+ (* 1/48 b) (* 1/2 (+ (* -1/4 b) (* 1/24 b))))))) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (* 1/2 (* (* a a) b)) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (* (* a a) b) #s(hole binary64 (* (pow a 2) b)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 1))
#s(approx (+ 1 (* a b)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (* a b) #s(hole binary64 (* a b)))
#s(approx (pow (cos a) -1) #s(hole binary64 1))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (pow (cos a) -1) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (* 1/24 (* a a)) #s(hole binary64 (* 1/24 (pow 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 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 (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (/ b (sin (* 1/2 (PI))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (+ (/ b (sin (* 1/2 (PI)))) (/ (* a (* b (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* b (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ b (sin (* 1/2 (PI)))))))) (* -1 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))))) (/ b (sin (* 1/2 (PI)))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/6 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (cos (* 1/2 (PI))) (+ (* -1 (/ (* b (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ b (sin (* 1/2 (PI))))))) (sin (* 1/2 (PI)))))))) (+ (* -1 (/ (* b (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ b (sin (* 1/2 (PI)))))))) (* -1 (/ (* b (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))))) (/ b (sin (* 1/2 (PI)))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* a (cos (* 1/2 (PI))))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* a (sin (* 1/2 (PI))))))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* a (cos (* 1/2 (PI))))))))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 1))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* 1/6 (* (pow a 2) b))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* -1/120 (* (pow a 2) b)) (* 1/6 b)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* 1/6 b) (* (pow a 2) (+ (* -1/120 b) (* 1/5040 (* (pow a 2) b))))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a b)))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* -1/6 (* (pow a 2) b))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* 1/120 (* (pow a 2) b))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) b)) (* 1/120 b)))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1 (* a b)) (* -1/2 (pow b 2)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* 1/4 (* a (pow b 2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (+ (* 1/6 (* a b)) (* 1/4 (pow b 2)))))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 b)))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* 1/4 (* a (pow b 2))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2))))))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/6 (pow b 2)) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* 1/4 (* a b))) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* a (+ (* 1/4 b) (* a (+ 1/6 (* -1/36 (pow b 2))))))) 1)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 b)))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* 1/6 (* a (pow b 2))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* 1/4 (* a b)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* a (+ (* -1/36 (* a (pow b 2))) (* 1/4 b))))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* 1/4 a))) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* a (+ 1/4 (* -1/36 (* a b)))))) 1/2)))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* a (+ (* -1/36 (* (pow a 2) b)) (* 1/6 b)))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* a (+ (* 1/6 b) (* (pow a 2) (+ (* -1/36 b) (* 1/720 (* (pow a 2) b))))))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* a (+ (* 1/6 b) (* (pow a 2) (+ (* -1/36 b) (* (pow a 2) (+ (* -1/30240 (* (pow a 2) b)) (* 1/720 b)))))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (cos (+ a 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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 1))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 b)))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (* (cos a) b) #s(hole binary64 b))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* (cos a) b) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 b))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ b a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ (+ a b) a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (pow a -1) #s(hole binary64 (/ 1 a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (sin b) (sin (- (* 1/2 (PI)) b))) (/ (* a (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* (cos (- (* 1/2 (PI)) b)) (sin b)) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (sin b) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (* -1 a) #s(hole binary64 (* -1 a)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* b (+ 1 (* 1/2 (/ (PI) b)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (+ (* 1/2 (/ (PI) b)) (/ a b))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#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 (* (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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b))))))) (pow (cos b) 6)) (/ (* r (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 7)))))) (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b)))))) (pow (cos b) 6)) (/ (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 7)))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -3/2 (cos b)) (* -1 (cos b))) (* -2 (cos b)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -3/2 (cos b)) (+ (* -1 (cos b)) (* a (- (+ (* -1 (/ (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))) (cos b))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (* 3/2 (sin b)))) (+ (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (* -1 (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4)))))))) (* -2 (cos b)))))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -2 (pow (cos b) 2)) (* a (- (* -2 (/ (pow (sin b) 3) (cos b))) (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (* (sin b) (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (cos b))))))) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (* a (* (cos b) (pow (sin b) 3)))) (* -2 (pow (cos b) 4))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (pow (cos b) 4)) (* a (- (* a (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* 2 (* (cos b) (pow (sin b) 3)))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* a (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* -1 (pow (cos b) 2))) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (- (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (/ (pow (sin b) 3) (cos b)))) (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (- (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (/ (pow (sin b) 3) (cos b)))) (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1 (/ (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))) (cos b))) (+ (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)) (/ (pow (sin b) 3) (pow (cos b) 2)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (- (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (/ (pow (sin b) 3) (cos b)))) (* -1 (/ (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))) (* (cos b) (sin b)))))) (pow (sin b) 2)))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (- (* a (- (* -1 (/ (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (cos b) (sin b)))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* -1 (pow (sin b) 2)))) (* (cos b) (sin b))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* a (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1 (/ (* (sin b) (- (* -1 (/ (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (cos b) (sin b)))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (cos b))) (+ (* 1/3 (pow (sin b) 2)) (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (cos b)))))) (* -1 (/ (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (cos b) (sin b))))) (+ (* -1 (/ (pow (sin b) 3) (cos b))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* -1 (pow (sin b) 2)))) (* (cos b) (sin b))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* -1 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (pow (sin b) 4) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* (pow a 2) (- (* -2/3 (pow (sin b) 4)) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -2/3 (pow (sin b) 4)) (* (pow a 2) (- (* 1/5 (pow (sin b) 4)) (+ (* -1/9 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -4/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/315 (* (pow (cos b) 2) (pow (sin b) 2)))))))) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (sin b) 4)) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (pow (sin b) 4))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (+ (* -2/3 (* (pow a 2) (pow (sin b) 4))) (pow (sin b) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* -2/3 (pow (sin b) 4)) (* 1/5 (* (pow a 2) (pow (sin b) 4))))) (pow (sin b) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow a 4) (+ (* (pow a 2) (+ (* -2/3 (pow (sin b) 4)) (* (pow a 2) (+ (* -34/945 (* (pow a 2) (pow (sin b) 4))) (* 1/5 (pow (sin b) 4)))))) (pow (sin b) 4)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow a 2) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2)))))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -1/3 (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow a 2) (+ (* 2/45 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* 2/3 (* (pow (cos b) 2) (pow (sin b) 2))) (* (pow a 2) (+ (* -1/9 (* (pow (cos b) 2) (pow (sin b) 2))) (+ (* -4/45 (* (pow (cos b) 2) (pow (sin b) 2))) (* -1/315 (* (pow (cos b) 2) (pow (sin b) 2)))))))))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* -1 (* a (* (cos b) (sin b))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (- (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (- (* a (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (- (* a (+ (* a (- (* -1/3 (* a (pow (sin b) 2))) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (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 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* -1/3 (pow a 2))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* 2/45 (pow a 2)) 1/3))))))
#s(approx (pow (sin a) 2) #s(hole binary64 (* (pow a 2) (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/45 (* -1/315 (pow a 2)))) 1/3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (neg b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI))))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))) (/ (* r (* (sin b) (+ (* 1/6 (* (cos (neg 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 (neg b)))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (+ (* (sin (neg (+ 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 (neg b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1 (* (sin b) (sin (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b)))) (* a (+ (* 1/6 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI))))))))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg b))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* -1 (* a (cos (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* -1/2 (* a (sin (neg b)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* a (+ (* -1/2 (sin (neg b))) (* 1/6 (* a (cos (neg b)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow a 2)) 1/2))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (+ (* 1/24 (/ 1 (pow a 2))) (/ 1 (pow a 6))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* (pow a 2) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (* b (cos a)) #s(hole binary64 (* b (cos a))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (* b r))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (+ (* b r) (/ r a)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 a))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* a (pow b 2))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* a (+ (/ b a) (pow b 2)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* a (pow b 2))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* a (+ (/ (* b (+ 1 (* 1/3 (pow b 2)))) a) (pow b 2)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* a b)))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* a (+ b (+ (* 1/3 (/ (pow b 2) a)) (/ 1 a))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* a b)))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* a (+ b (* 1/3 (/ (pow b 2) a))))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 a))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* a (+ 1 (* 1/3 (/ b a))))))
#s(approx (/ b (cos a)) #s(hole binary64 (/ b (cos a))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 b) (/ b (pow a 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a b)))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a (+ b (/ 1 a)))))
#s(approx (pow (cos a) -1) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- (+ 1/24 (/ 1 (pow a 4))) (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* (pow a 2) (- 1/24 (* 1/2 (/ 1 (pow 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 (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (- (* -1/2 (* b (cos a))) (sin a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))
#s(approx (* 1/6 (* b (sin a))) #s(hole binary64 (* 1/6 (* b (sin a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* (* (cos a) b) -1/2) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (* (cos a) b) #s(hole binary64 (* b (cos a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 1))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 a))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* a (+ 1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (/ a b)))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (/ 1 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 (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 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)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b)))))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b))))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (+ (* (pow (cos a) 2) (pow (cos b) 2)) (/ (* (pow (sin a) 4) (pow (sin b) 4)) (- (* (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)))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b)))))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (- (* (pow (sin a) 4) (pow (sin b) 4)) (* (pow (cos a) 2) (* (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b))))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (- (* (pow (sin a) 4) (pow (sin b) 4)) (* (pow (cos a) 2) (* (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow (sin a) 4) (pow (sin b) 4))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow (cos a) 2) (* (pow (cos b) 2) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (- (* (pow (sin a) 2) (pow (sin b) 2)) (* (cos a) (* (cos b) (* (sin a) (sin b)))))))
#s(approx (/ (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 (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (sin a) 2) #s(hole binary64 (pow (sin a) 2)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (neg (+ a b)))) (* (cos (+ a b)) (sin (* 1/2 (PI)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg (+ a b)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* a (+ (* -1 (* b r)) (* -1 (/ r a)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (/ (* (sin b) r) (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 (+ b (* a (* b b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* -1 (pow b 2)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* b (+ 1 (* 1/3 (pow b 2)))) a)) (* -1 (pow b 2)))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* -1 (* a (+ (* -1 b) (* -1 (/ (+ 1 (* 1/3 (pow b 2))) a)))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* -1 (* a (+ (* -1 b) (* -1/3 (/ (pow b 2) a)))))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* -1 (* a (- (* -1/3 (/ b a)) 1)))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* a (- (* -1 b) (/ 1 a))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) #s(hole binary64 (/ b (sin (+ (* -1 a) (* 1/2 (PI)))))))
#s(approx (sin (- (* 1/2 (PI)) a)) #s(hole binary64 (sin (+ (* -1 a) (* 1/2 (PI))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* -1 (* a (- (* -1/2 (/ (PI) (* a b))) (/ 1 b))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 a) b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))) 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 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* b r) (sin (* 1/2 (PI))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (cos (* 1/2 (PI))) (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI)))))))) (* -1/6 (/ r (sin (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (* (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)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (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 (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 (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (* 1/3 (* b b)) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 1/3))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 (+ 1/3 (* 2/15 (pow b 2)))))
#s(approx (* 2/15 (* b b)) #s(hole binary64 (* 2/15 (pow b 2))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2)))))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 1/3))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (+ 1/3 (* 2/15 (pow b 2)))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2)))))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* 2/15 (pow b 2))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 2/15))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 (+ 2/15 (* 17/315 (pow b 2)))))
#s(approx (* 17/315 (* b b)) #s(hole binary64 (* 17/315 (pow b 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 b))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ b (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* 1/3 (/ b a)))) (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* b (+ (* 2/3 b) (* 1/3 (/ 1 a)))))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ b a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* 1/3 (/ (pow b 2) a)) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (pow b 2) a)) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 17/315 (/ (pow b 2) a)) (* 2/15 (/ 1 a)))) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (* a (cos b)) #s(hole binary64 a))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (pow b 2)))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* -1/3 (pow b 2))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* 2/45 (pow b 2)) 1/3))))))
#s(approx (pow (sin b) 2) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 2/45 (* -1/315 (pow b 2)))) 1/3))))))
#s(approx (pow (cos b) 2) #s(hole binary64 1))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* -1 (pow b 2)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/3 (pow b 2)) 1)))))
#s(approx (pow (cos b) 2) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/3 (* -2/45 (pow b 2)))) 1)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 1))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (+ 1 (* b (+ a (* 1/3 b))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* b (+ a (* 1/3 b)))))
#s(approx (* 1/3 b) #s(hole binary64 (* 1/3 b)))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* b (+ 1 (* 1/2 (pow a 2))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ 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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1/2 (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (cos (+ a 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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (cos a)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (* -1/2 (* b b)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (pow b -1) #s(hole binary64 (/ 1 b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (* -1 (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (exp (* (log b) 2)) #s(hole binary64 (pow b 2)))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (log b))))
#s(approx (log b) #s(hole binary64 (log b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ 1 (sin (- (* 1/2 (PI)) a))) (/ (* b (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* 1/2 (/ 1 (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (pow (cos (- (* 1/2 (PI)) a)) 2) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* 1/6 (/ 1 (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (cos (- (* 1/2 (PI)) a)) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ 1 (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (* -1 b) #s(hole binary64 (* -1 b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (* 1/2 (PI))) b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (+ b (* 1/2 (PI)))) b)))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (/ (+ a (* 1/2 (PI))) b)))
#s(approx (/ (PI) b) #s(hole binary64 (/ (PI) b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (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 (- (* (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 (* (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 (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (* 1/24 (* b b)) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2))))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (+ 1/24 (* -1/720 (pow b 2)))))
#s(approx (* -1/720 (* b b)) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (cos b) 3) #s(hole binary64 1))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (* -2 (/ (* r (pow (sin a) 3)) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 7)) (/ (* r (+ (* -1 (* (pow (cos a) 2) (pow (sin a) 3))) (+ (* -1 (* (pow (cos a) 4) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 3/2 (* (pow (cos a) 4) (sin a)))))) (pow (cos a) 6)))))) (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/3 (/ 1 (cos a))) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 7))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -3/2 (cos a)) (* -1 (cos a))) (* -2 (cos a)))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -3/2 (cos a)) (+ (* -1 (cos a)) (* b (- (+ (* -1 (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (* 3/2 (sin a)))) (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* -1 (/ (* (sin a) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))))) (* -2 (cos a)))))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -2 (pow (cos a) 2)) (* b (- (* -2 (/ (pow (sin a) 3) (cos a))) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (* (sin a) (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (/ (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (cos a))))))) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (* -2 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* b (- (* b (- (* 5/3 (pow (cos a) 4)) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* 2 (* (cos a) (pow (sin a) 3)))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos a) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* b (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (* -1 (pow (cos a) 2))) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (- (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (+ (* -1/6 (* (cos a) (sin a))) (/ (pow (sin a) 3) (cos a))))) (* -1 (/ (* (cos a) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))) (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1/6 (/ (sin a) (pow (cos a) 2))) (/ (pow (sin a) 3) (pow (cos a) 4)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))) (* (pow (cos a) 2) (sin 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 (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))) (sin a))) (+ (* -1 (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)) (/ (pow (sin a) 3) (pow (cos a) 2)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (- (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (/ (pow (sin a) 3) (cos a)))) (* -1 (/ (* (cos a) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))) (sin a))))) (pow (sin a) 2)))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1 (/ (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (cos a) (sin a)))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* -1 (pow (sin a) 2)))) (* (cos a) (sin a))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1 (/ (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (cos a) (sin a)))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (cos a))) (+ (* 1/3 (pow (sin a) 2)) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (* -1 (/ (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (cos a) (sin a))))) (+ (* -1 (/ (pow (sin a) 3) (cos a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* -1 (pow (sin a) 2)))) (* (cos a) (sin a))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* -1 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (pow (sin a) 4) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (+ (* (pow b 2) (- (* -2/3 (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* -2/3 (pow (sin a) 4)) (* (pow b 2) (- (* 1/5 (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1/9 (pow (sin a) 2)) (+ (* -4/45 (pow (sin a) 2)) (* -1/315 (pow (sin a) 2)))))))) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2)))))) (pow (sin a) 4)) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (pow (sin a) 4))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (+ (* -2/3 (* (pow b 2) (pow (sin a) 4))) (pow (sin a) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* -2/3 (pow (sin a) 4)) (* 1/5 (* (pow b 2) (pow (sin a) 4))))) (pow (sin a) 4)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* (pow b 4) (+ (* (pow b 2) (+ (* -2/3 (pow (sin a) 4)) (* (pow b 2) (+ (* -34/945 (* (pow b 2) (pow (sin a) 4))) (* 1/5 (pow (sin a) 4)))))) (pow (sin a) 4)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2))))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 2) (+ (* -1/9 (pow (sin a) 2)) (+ (* -4/45 (pow (sin a) 2)) (* -1/315 (pow (sin a) 2)))))) (* (pow (cos a) 2) (+ (* 2/45 (pow (sin a) 2)) (* 2/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (+ (* -1 (pow (sin a) 2)) (* -1/3 (pow (sin a) 2)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* -1 (* b (* (cos a) (sin a))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (- (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (- (* b (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (- (* b (+ (* b (- (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (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 (+ (* (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (+ 1 (* 1/6 (pow b 2)))))
#s(approx (* 1/6 (* b b)) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) #s(hole binary64 b))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (neg a)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (neg a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (+ (/ (* r (+ (* 1/6 (* (cos (neg 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 (neg a)))) 2)) (/ (* (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a))))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a))))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI)))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (+ (* (sin (neg (+ 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 (neg a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1 (* (sin a) (sin (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))) (* b (+ (* 1/6 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg a))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* -1 (* b (cos (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* -1/2 (* b (sin (neg a)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* b (+ (* -1/2 (sin (neg a))) (* 1/6 (* b (cos (neg a)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) 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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* b (+ (* a r) (/ r b)))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 b))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 (* 1/3 (pow b 3))))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) #s(hole binary64 (* (pow b 3) (+ 1/3 (/ 1 (pow b 2))))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ 1 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* 2/15 (pow b 5))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* (pow b 5) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* (pow b 5) (+ 2/15 (+ (* 1/3 (/ 1 (pow b 2))) (/ 1 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (* 2/15 (pow b 4))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 2/15 (+ (* 1/3 (/ 1 (pow b 2))) (/ 1 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* 2/15 (pow b 4))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) #s(hole binary64 (* (pow b 4) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 (* 2/15 (pow b 2))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(hole binary64 (* (pow b 2) (+ 2/15 (* 1/3 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* 17/315 (pow b 7))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* (pow b 7) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* (pow b 7) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* (pow b 7) (+ 17/315 (+ (/ 1/3 (pow b 4)) (+ (* 2/15 (/ 1 (pow b 2))) (/ 1 (pow b 6))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* 17/315 (pow b 6))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (+ (/ 1/3 (pow b 4)) (+ (* 2/15 (/ 1 (pow b 2))) (/ 1 (pow b 6))))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* 17/315 (pow b 6))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) #s(hole binary64 (* (pow b 6) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (* 17/315 (pow b 4))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(hole binary64 (* (pow b 4) (+ 17/315 (+ (/ 1/3 (pow b 4)) (* 2/15 (/ 1 (pow b 2))))))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* 17/315 (pow b 4))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) #s(hole binary64 (* (pow b 4) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 (* 17/315 (pow b 2))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(hole binary64 (* (pow b 2) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ (* (pow b 2) (sin a)) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 2) (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ b (* a (* b b))) #s(hole binary64 (* (pow b 2) (+ a (/ 1 b)))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (pow (sin b) 2) #s(hole binary64 (pow (sin b) 2)))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* 1/3 (pow b 3))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* (pow b 3) (+ 1/3 (/ a b)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* (pow b 3) (+ 1/3 (+ (/ 1 (pow b 2)) (/ a b))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ a b)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (+ (/ 1 (pow b 2)) (/ a b))))))
#s(approx (* b (+ a (* 1/3 b))) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ a b)))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* b (+ 1/3 (/ a b)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (+ b (PI))) (cos (+ b (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) b)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ (* b (sin a)) (pow (cos a) 2))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* b (+ a (/ 1 b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (cos a) b)) (+ (* 1/6 (sin a)) (/ (cos a) (pow b 3)))) (/ (sin a) (pow b 2))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* 1/6 (* b (sin a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/2))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (* (log b) 2) #s(hole binary64 (* -2 (log (/ 1 b)))))
#s(approx (log b) #s(hole binary64 (* -1 (log (/ 1 b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- (+ 1/24 (/ 1 (pow b 4))) (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* (pow b 2) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (+ (* 1/24 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (pow (cos b) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* 1/6 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* b (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* (pow b 2) (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (sin b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 (sin b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* b (+ (* -1 (* a r)) (* -1 (/ r b)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) #s(hole binary64 (* -1 (* (pow b 5) (- (* -1 (/ (+ 1/3 (/ 1 (pow b 2))) (pow b 2))) 2/15)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* -1 (* (pow b 7) (- (* -1 (/ (+ 2/15 (* 1/3 (/ 1 (pow b 2)))) (pow b 2))) 17/315)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) #s(hole binary64 (* -1 (* (pow b 7) (- (* -1 (/ (+ 1/3 (/ 1 (pow b 2))) (pow b 4))) (+ 17/315 (* 2/15 (/ 1 (pow b 2)))))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1 (/ a b)) 1/3)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) #s(hole binary64 (* -1 (* (pow b 3) (- (* -1 (/ (+ a (/ 1 b)) b)) 1/3)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(hole binary64 (* (pow b 2) (+ 1/3 (* -1 (/ (- (* -1 a) (/ 1 b)) b))))))
#s(approx (+ a (* 1/3 b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1/3)))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* -1 (* b (- (* -1/2 (pow a 2)) 1)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (- (PI) (* -1 b))) (cos (- (PI) (* -1 b))))))
#s(approx (+ b (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* b (- (* -1 a) (/ 1 b))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (* 1/2 (cos a)) (/ (sin a) b)) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (- (* 1/2 (PI)) (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 b)))))))
#s(approx (log b) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 b))))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ a b)) (* -1/2 (/ (PI) b))) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 a) (* -1/2 (PI))) b)))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) #s(hole binary64 (* -1 (/ (+ (* -1 a) (* -1/2 (PI))) b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 b) a))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))
Outputs
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r)))
(fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))
(+.f64 (*.f64 a (*.f64 (*.f64 b b) r)) (*.f64 b r))
a
(*.f64 (*.f64 b b) r)
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
b
r
(*.f64 b r)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 (neg.f64 r) (neg.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 r #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 #s(literal -1/2 binary64) (*.f64 a a))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
#s(literal -1/2 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)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (/.f64 r #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))))))))
(*.f64 b (/.f64 r #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)))))))
(/.f64 (neg.f64 r) (neg.f64 #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)))))))
(/.f64 r #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 (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)))))
(+.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))))
(*.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)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) (+.f64 #s(literal 1/4 binary64) (*.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)))))
(-.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))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
#s(literal 1/24 binary64)
(*.f64 #s(literal -1/720 binary64) (*.f64 a a))
#s(literal -1/720 binary64)
#s(literal 1/2 binary64)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.f64 (fma.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (*.f64 b (cos.f64 a)) (*.f64 r (sin.f64 a)))) (*.f64 (*.f64 b (cos.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (neg.f64 r) (neg.f64 (*.f64 b (cos.f64 a))))
(/.f64 r (*.f64 b (cos.f64 a)))
(*.f64 b (cos.f64 a))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(/.f64 (neg.f64 (*.f64 r (sin.f64 a))) (neg.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(*.f64 r (sin.f64 a))
(sin.f64 a)
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r))))
(+.f64 r (*.f64 a (*.f64 b r)))
(*.f64 a (*.f64 b r))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (neg.f64 (*.f64 r (sin.f64 b))) (neg.f64 (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r (sin.f64 b))
(sin.f64 b)
(fma.f64 (sin.f64 a) (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 a) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 a) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (neg.f64 (*.f64 r (sin.f64 b))) (neg.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (*.f64 (sin.f64 b) (cos.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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))) (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(*.f64 (sin.f64 a) (sin.f64 b))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.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 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))) #s(literal 2 binary64)))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
#s(literal 3 binary64)
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 b r)) (neg.f64 (cos.f64 a)))
(/.f64 (*.f64 b r) (cos.f64 a))
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(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 #s(literal 1/3 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
(*.f64 #s(literal 1/3 binary64) (*.f64 b b))
#s(literal 1/3 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(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 (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(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 #s(literal 2/15 binary64) (*.f64 b 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))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))
(*.f64 #s(literal 2/15 binary64) (*.f64 b b))
#s(literal 2/15 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(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 (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)))))))))
(*.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))))))))
(+.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)))))))
(*.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))))))
(+.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)))))
(*.f64 (*.f64 b b) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b))))
(+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))
(*.f64 #s(literal 17/315 binary64) (*.f64 b b))
#s(literal 17/315 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))
(+.f64 b (*.f64 a (*.f64 b b)))
(*.f64 a (*.f64 b b))
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
(*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.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))))
(+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (*.f64 a (cos.f64 b))))
(/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))
(*.f64 a (cos.f64 b))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.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 (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 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))
(+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))
(*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))
(+.f64 a (*.f64 #s(literal 1/3 binary64) b))
(*.f64 #s(literal 1/3 binary64) b)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (/ b (cos a)) b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (/ b (cos a)) b))
#s(approx (/ b (cos a)) b)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
(+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))
(*.f64 (*.f64 a a) b)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(+.f64 b (PI.f64))
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
(+.f64 #s(literal 1 binary64) (*.f64 a b))
(*.f64 a b)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 binary64)))
#s(literal -1 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 (neg.f64 b) (neg.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b #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 (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b #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)))))))
(/.f64 (neg.f64 b) (neg.f64 #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)))))))
(/.f64 b #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 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 a a))
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 (neg.f64 b) (neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 a)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 a)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 a a (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)
(*.f64 r (/.f64 #s(approx (sin b) b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))))
(/.f64 (neg.f64 #s(approx (sin b) b)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))))
(/.f64 #s(approx (sin b) b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b)))
#s(approx (sin b) b)
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
(*.f64 r (/.f64 #s(approx (sin b) b) #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 (neg.f64 #s(approx (sin b) b)) (neg.f64 #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 #s(approx (sin b) b) #s(approx (+ (* (sin (neg (+ 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 (neg (+ 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)))))
(+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))
(*.f64 b (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) b) #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 (neg.f64 #s(approx (sin b) b)) (neg.f64 #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 #s(approx (sin b) b) #s(approx (+ (* (sin (neg (+ 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 (neg (+ 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)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (fma.f64 (sin.f64 a) (sin.f64 a) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
(-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))
(*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 (neg.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (neg.f64 #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (+ (* (sin (neg (+ 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 b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 (neg.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (neg.f64 #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (+ (* (sin (neg (+ 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))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 (neg.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (neg.f64 #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (+ (* (sin (neg (+ 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 (neg (+ 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)))))
(+.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))))
(*.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)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (fma.f64 (sin.f64 a) (sin.f64 a) (*.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)))))
(-.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))
(*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))
#s(literal 1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.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))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (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)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/2 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
(fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))
(+.f64 (*.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b) (cos.f64 a))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (fma.f64 (sin.f64 a) (sin.f64 a) (*.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)))))
(-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a))
(*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64))
#s(approx (* (cos a) b) b)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
(/.f64 (sin.f64 b) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (+.f64 a b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 a b))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (+.f64 a b) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 (+.f64 a b) (+.f64 a b) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))
(+.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))))
(sin.f64 (+.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)
#s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))))
(*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) b (*.f64 a #s(literal 1 binary64))) (*.f64 a b))
(+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))
(pow.f64 a #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 a))
(/.f64 #s(literal 1 binary64) a)
(exp.f64 (*.f64 (log.f64 a) #s(literal -1 binary64)))
(pow.f64 b #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 b))
(/.f64 #s(literal 1 binary64) b)
(exp.f64 (*.f64 (log.f64 b) #s(literal -1 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(sin.f64 (+.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))
(*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)
#s(approx (+ (/ b a) 1) (/.f64 b a))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))))
(sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))))
(cos.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))
(/.f64 (neg.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))) (neg.f64 (-.f64 a b)))
(/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (fma.f64 b b (*.f64 a b))))
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))))
(sin.f64 (+.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (-.f64 (*.f64 a a) (*.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 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (fma.f64 (*.f64 a a) (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))))
(-.f64 (*.f64 a a) (*.f64 b b))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
(*.f64 (log.f64 b) #s(literal 2 binary64))
(log.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))))
(sin.f64 (+.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))))
(cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 #s(approx (- a b) a)))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a))
(-.f64 (/.f64 (*.f64 a a) #s(approx (- a b) a)) (/.f64 (*.f64 b b) #s(approx (- a b) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (fma.f64 (*.f64 a a) (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))))
(-.f64 (*.f64 a a) (*.f64 b b))
#s(approx (- a b) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))
(*.f64 #s(literal -1 binary64) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))
(*.f64 #s(literal -1 binary64) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (/.f64 a b))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 b))
(/.f64 (PI.f64) b)
(/.f64 (neg.f64 a) (neg.f64 b))
(/.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) #s(approx (* (cos b) (cos a)) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (-.f64 (pow.f64 (*.f64 #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))))) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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))))) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (-.f64 (pow.f64 (*.f64 #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))))) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 b) (sin.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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))))) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)) (*.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.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))))
(*.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)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))) (+.f64 #s(literal 1/4 binary64) (*.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)))))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/720 binary64) (*.f64 b b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)) (fma.f64 #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 b a)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
#s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.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))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (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)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 a) (cos.f64 b))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (cos.f64 a))
(*.f64 (cos.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (cos.f64 b))
(*.f64 (cos.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 3 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
(/.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))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
(/.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))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (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))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (fabs.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))
(*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (fabs.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (fabs.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (+.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (fabs.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64))
(*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (neg.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fabs.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.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))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (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)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (fabs.f64 (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 a) (sin.f64 a))
(pow.f64 (sin.f64 a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.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))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (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)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (neg.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (fabs.f64 (*.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (pow.f64 #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)) #s(literal -1 binary64)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (pow.f64 #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)) #s(literal -1 binary64))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (pow.f64 #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)) #s(literal -1 binary64)) (cos.f64 (+.f64 a b)))
(pow.f64 #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))))
(/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))) (neg.f64 b))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)
(+.f64 (pow.f64 b #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) b))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
(*.f64 #s(literal 1/6 binary64) (*.f64 b b))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.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))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (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)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(*.f64 r (/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(*.f64 r (/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64))) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(*.f64 r (/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a)))
(*.f64 (sin.f64 b) r)
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b)))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #s(approx (+ (* (sin (neg (+ 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)))))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ 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))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.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))))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (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)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(neg.f64 (sin.f64 (+.f64 a b)))
(sin.f64 (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b (*.f64 r (+.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 (+ (* a (* (* b b) r)) (* b r)) (*.f64 r (+.f64 b (*.f64 a (*.f64 b b)))))
#s(approx (* (* b b) r) (*.f64 (*.f64 b b) r))
#s(approx r r)
#s(approx (* b r) (*.f64 b r))
#s(approx (* b (/ r (cos a))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ r (cos a)) (/.f64 r (cos.f64 a)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 r (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 b (*.f64 r (+.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)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (*.f64 r (+.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))))))
#s(approx (/ r (* b (cos a))) (/.f64 r (*.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* r (sin a)) (*.f64 r (sin.f64 a)))
#s(approx (+ r (* a (* b r))) (*.f64 r (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (* a (* b r)) (*.f64 a (*.f64 b r)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (* b r) (cos a)) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 (+.f64 a b))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 b b)))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 r (-.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)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.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))))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a (*.f64 b r)) (*.f64 (*.f64 b b) r)) (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 b r) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (*.f64 b r)))))) (*.f64 (*.f64 b b) r)) (*.f64 b r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 b r))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r)))
#s(approx a a)
#s(approx (* b (/ r (cos a))) (*.f64 b r))
#s(approx (* b (/ r (cos a))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 b r)) (*.f64 b r)))
#s(approx (* b (/ r (cos a))) (fma.f64 b r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (* b (/ r (cos a))) (fma.f64 b r (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 b r) (fma.f64 #s(literal 1/48 binary64) (*.f64 b r) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ r (cos a)) r)
#s(approx (/ r (cos a)) (+.f64 r (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) r))))
#s(approx (/ r (cos a)) (+.f64 r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (/ r (cos a)) (+.f64 r (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (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 (+ 1 (* -1/2 (* a a))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* a a))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (* -1/2 (* a a)) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(approx (* a a) (*.f64 a a))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (+.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 (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (+.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) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.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) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (-.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) (+ 1/24 (* -1/720 (* a a)))) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(literal 1/24 binary64))
#s(approx (+ 1/24 (* -1/720 (* a a))) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
#s(approx (* -1/720 (* a a)) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a r) (*.f64 b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (*.f64 b r)))) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) r)
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.f64 r (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a r) (*.f64 b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.f64 r (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) r (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))))) (*.f64 b r)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (fma.f64 a r (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (fma.f64 a (+.f64 r (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a r) b))) (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (fma.f64 a (+.f64 r (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 r b))))) (/.f64 r b)))
#s(approx (/ r (* b (cos a))) (/.f64 r b))
#s(approx (/ r (* b (cos a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) r) b) (/.f64 r b)))
#s(approx (/ r (* b (cos a))) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (/.f64 r b) (*.f64 #s(literal 1/24 binary64) (/.f64 r b))))) (*.f64 #s(literal -1/2 binary64) (/.f64 r b))) (/.f64 r b)))
#s(approx (/ r (* b (cos a))) (fma.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (/.f64 r b) (fma.f64 #s(literal 1/48 binary64) (/.f64 r b) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 r b) (*.f64 #s(literal 1/24 binary64) (/.f64 r b)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 r b) (*.f64 #s(literal 1/24 binary64) (/.f64 r b))))) (*.f64 #s(literal -1/2 binary64) (/.f64 r b))) (/.f64 r b)))
#s(approx (* b (cos a)) b)
#s(approx (* b (cos a)) (+.f64 b (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* b (cos a)) (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* b (cos a)) (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/24 binary64) b)))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) (*.f64 a r))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (/ (* r (sin a)) (pow (cos a) 2)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/120 binary64) r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r))) (fma.f64 #s(literal -2/45 binary64) r (*.f64 #s(literal 1/3 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 1/3 binary64) r))))) (*.f64 #s(literal -1 binary64) r))))))
#s(approx (* r (sin a)) (*.f64 a r))
#s(approx (* r (sin a)) (*.f64 a (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) r)))))
#s(approx (* r (sin a)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) r)))))))
#s(approx (* r (sin a)) (*.f64 a (+.f64 r (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (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 (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 (+ r (* a (* b r))) r)
#s(approx (+ r (* a (* b r))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 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 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 a (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 b) (sin.f64 b))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 b) (sin.f64 b)))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 b) (sin.f64 b))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))
#s(approx (* (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 (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (*.f64 a (cos.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* (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)) 2) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* b r) (cos a)) (*.f64 b r))
#s(approx (/ (* b r) (cos a)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 b r)) (*.f64 b r)))
#s(approx (/ (* b r) (cos a)) (fma.f64 b r (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ (* b r) (cos a)) (fma.f64 b r (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 b r) (fma.f64 #s(literal 1/48 binary64) (*.f64 b r) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) b)
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a b) (*.f64 b b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) b (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal -1 binary64) b))))) (*.f64 b b)))))
#s(approx (+ b (* a (* b b))) b)
#s(approx (+ b (* a (* b b))) (+.f64 b (*.f64 a (*.f64 b b))))
#s(approx (* a (* b b)) (*.f64 a (*.f64 b b)))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (tan.f64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan 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 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (tan.f64 b))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 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) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (+.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)))) a))
#s(approx (/ (sin b) (* a (cos b))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
#s(approx (* a (cos b)) (*.f64 a (cos.f64 b)))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (fma.f64 a (*.f64 b b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) (*.f64 a b))))
#s(approx (* b (+ a (* 1/3 b))) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
#s(approx (* b (+ a (* 1/3 b))) (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) (*.f64 a b)))
#s(approx (+ a (* 1/3 b)) (*.f64 #s(literal 1/3 binary64) b))
#s(approx (+ a (* 1/3 b)) (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))
#s(approx (/ b (cos a)) b)
#s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b)))) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) b (fma.f64 #s(literal 1/48 binary64) b (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b))))))) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b)))) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (+ b (* 1/2 (* (* a a) b))) b)
#s(approx (+ b (* 1/2 (* (* a a) b))) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* 1/2 (* (* a a) b)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
#s(approx (* (* a a) b) (*.f64 (*.f64 a a) b))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(literal 1 binary64))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) a)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a (+.f64 b (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal -1 binary64) b)))))))))
#s(approx (+ 1 (* a b)) #s(literal 1 binary64))
#s(approx (+ 1 (* a b)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
#s(approx (* a b) (*.f64 a b))
#s(approx (pow (cos a) -1) #s(literal 1 binary64))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a))))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 5/24 binary64) (*.f64 a a))))))
#s(approx (pow (cos a) -1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 5/24 binary64) (*.f64 #s(literal 61/720 binary64) (*.f64 a a))))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (+.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 (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* a a)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* a a)) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) (+.f64 (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 a (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (- (* 1/2 (PI)) a)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (- (* 1/2 (PI)) a)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (- (* 1/2 (PI)) a)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (- (* 1/2 (PI)) a)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (- (* 1/2 (PI)) a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (- (* 1/2 (PI)) a) (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (* b (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (* -1 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (* -1 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/120 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/6 binary64) b))))))
#s(approx (* -1 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/6 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/120 binary64) b (*.f64 #s(literal 1/5040 binary64) (*.f64 (*.f64 a a) b)))))))))
#s(approx (* b (sin a)) (*.f64 a b))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) b (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 a a) b)))))))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/6 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/120 binary64) b))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (*.f64 #s(literal 1/4 binary64) (*.f64 b b))) #s(literal 1/2 binary64))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 b b)))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (*.f64 #s(literal 1/4 binary64) (*.f64 b b))))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) b)))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) a (*.f64 #s(literal 1/4 binary64) b))) #s(literal 1 binary64)))))
#s(approx (* -1/2 (* b (cos a))) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (* -1/2 (* b (cos a))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* -1/2 (* b (cos a))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/4 binary64) b)))))
#s(approx (* -1/2 (* b (cos a))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/4 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/48 binary64) b (*.f64 #s(literal 1/1440 binary64) (*.f64 (*.f64 a a) b))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 b b)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 b b) (*.f64 #s(literal 1/4 binary64) (*.f64 a b))) #s(literal 1 binary64)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal 1/4 binary64) b (*.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))))) #s(literal 1 binary64)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/6 binary64) (*.f64 a (*.f64 b b)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (fma.f64 #s(literal 1/6 binary64) (*.f64 b b) (*.f64 #s(literal 1/4 binary64) (*.f64 a b))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (fma.f64 #s(literal 1/6 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1/36 binary64) (*.f64 a (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) b)))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) b (*.f64 #s(literal 1/4 binary64) a))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) b (*.f64 a (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 a b)))))) #s(literal 1/2 binary64)))
#s(approx (* 1/6 (* b (sin a))) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))
#s(approx (* 1/6 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1/36 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/6 binary64) b))))
#s(approx (* 1/6 (* b (sin a))) (*.f64 a (fma.f64 #s(literal 1/6 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/36 binary64) b (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 a a) b)))))))
#s(approx (* 1/6 (* b (sin a))) (*.f64 a (fma.f64 #s(literal 1/6 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/36 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/30240 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/720 binary64) b))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ 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 (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ 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 (neg (+ 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 (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (*.f64 #s(literal 1/4 binary64) (*.f64 b b))) #s(literal 1/2 binary64))))))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) a (*.f64 #s(literal 1/4 binary64) b))) #s(literal 1 binary64)))))
#s(approx (* (* (cos a) b) -1/2) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (* (* (cos a) b) -1/2) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* (* (cos a) b) -1/2) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/4 binary64) b)))))
#s(approx (* (* (cos a) b) -1/2) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/4 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/48 binary64) b (*.f64 #s(literal 1/1440 binary64) (*.f64 (*.f64 a a) b))))))))
#s(approx (* (cos a) b) b)
#s(approx (* (cos a) b) (+.f64 b (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (* (cos a) b) (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* (cos a) b) (+.f64 b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) b) (*.f64 #s(literal 1/24 binary64) b)))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (- (* 1/2 (PI)) (+ a b)) (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (+ (/ b a) 1) a) b)
#s(approx (* (+ (/ b a) 1) a) (+.f64 a b))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a))
#s(approx (* b (+ (pow a -1) (pow b -1))) (/.f64 b a))
#s(approx (* b (+ (pow a -1) (pow b -1))) (/.f64 (+.f64 a b) a))
#s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))
#s(approx (pow a -1) (pow.f64 a #s(literal -1 binary64)))
#s(approx (/ b a) (/.f64 b a))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (tan.f64 b))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 b))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) b)
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (+.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
#s(approx (- (* a a) (exp (* (log b) 2))) (-.f64 (*.f64 a a) (*.f64 b b)))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- a b) (-.f64 a b))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (tan.f64 b))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 b))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) b)
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (+.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
#s(approx (- (* a a) (exp (* (log b) 2))) (-.f64 (*.f64 a a) (*.f64 b b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 a (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (* -1 a) (*.f64 #s(literal -1 binary64) a))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+.f64 a (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))
#s(approx (/ a b) (/.f64 a b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 a a) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (cos a) 3) #s(literal 1 binary64))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (*.f64 a a))))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a a)) #s(literal 3/2 binary64)))))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (*.f64 a a)))) #s(literal 3/2 binary64)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/144 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/240 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (*.f64 #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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (*.f64 #s(literal -2 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 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 #s(literal -1 binary64) (cos.f64 b))) (*.f64 #s(literal -2 binary64) (cos.f64 b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal 3/2 binary64) (sin.f64 b)))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))))))) (*.f64 #s(literal -2 binary64) (cos.f64 b))))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (cos.f64 b)) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -34/45 binary64) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (fma.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (fma.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (fma.f64 #s(literal -2/3 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.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 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))) (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 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (cos.f64 b)) (+.f64 (/.f64 (*.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)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 a (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 a (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (cos.f64 b)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (/.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))))) (cos.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 b) (sin.f64 b))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1/9 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (fma.f64 #s(literal -4/45 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/315 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (*.f64 a (sin.f64 b)) #s(literal 4 binary64)))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (*.f64 #s(literal 1/5 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -34/945 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (*.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/9 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (fma.f64 #s(literal -4/45 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(literal -1/315 binary64) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64))))))))))) (pow.f64 (*.f64 (cos.f64 b) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (-.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (-.f64 (*.f64 a (fma.f64 a (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (pow (sin a) 2) (*.f64 a a))
#s(approx (pow (sin a) 2) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 a a)))))
#s(approx (pow (sin a) 2) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 a a)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin a) 2) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 a a)))) #s(literal 1/3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (tan.f64 b))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (tan.f64 b) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 b))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (tan.f64 b))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (tan.f64 b))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (tan.f64 b))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (tan.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (tan.f64 b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (tan.f64 b))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b)))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (tan.f64 b))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (tan.f64 b)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 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 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 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 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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) (pow.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 3 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 3 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 3 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))))))
#s(approx (+ (* (sin (neg (+ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b)))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))) (*.f64 a (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 b) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (fma.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 b))))))
#s(approx (sin (neg (+ a b))) (neg.f64 (sin.f64 b)))
#s(approx (sin (neg (+ a b))) (+.f64 (neg.f64 (sin.f64 b)) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 b)))))
#s(approx (sin (neg (+ a b))) (+.f64 (neg.f64 (sin.f64 b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 a (neg.f64 (sin.f64 b))))))))
#s(approx (sin (neg (+ a b))) (+.f64 (neg.f64 (sin.f64 b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 b)))))))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) b))
#s(approx (neg (+ a b)) (-.f64 (*.f64 #s(literal -1 binary64) 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 (fma.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 (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/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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))
#s(approx (cos a) (cos.f64 a))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 (*.f64 a a) (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64)) (pow.f64 a #s(literal -6 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* b (cos a)) (*.f64 b (cos.f64 a)))
#s(approx (sin a) (sin.f64 a))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))
#s(approx (+ r (* a (* b r))) (*.f64 a (fma.f64 b r (/.f64 r a))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) a)
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a) (/.f64 b a)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (pow (* (sin a) (sin b)) 2) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (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 (+ b (* a (* b b))) (*.f64 a (*.f64 b b)))
#s(approx (+ b (* a (* b b))) (*.f64 a (+.f64 (/.f64 b a) (*.f64 b b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 a (*.f64 b b)))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 a (+.f64 (/.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))) a) (*.f64 b b))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 a b))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 a (+.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 b b) a) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* b (+ a (* 1/3 b))) (*.f64 a b))
#s(approx (* b (+ a (* 1/3 b))) (*.f64 a (+.f64 b (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 b b) a)))))
#s(approx (+ a (* 1/3 b)) a)
#s(approx (+ a (* 1/3 b)) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 b a)))))
#s(approx (/ b (cos a)) (/.f64 b (cos.f64 a)))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) b (/.f64 b (*.f64 a a)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ 1 (* a b)) (*.f64 a b))
#s(approx (+ 1 (* a b)) (*.f64 a (+.f64 b (pow.f64 a #s(literal -1 binary64)))))
#s(approx (pow (cos a) -1) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -2 binary64))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal -4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -2 binary64))))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -2 binary64))))))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (sin (- (* 1/2 (PI)) a)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (- (* 1/2 (PI)) a) (*.f64 #s(literal -1 binary64) a))
#s(approx (- (* 1/2 (PI)) a) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (* -1 (* b (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (* b (sin a)) (*.f64 b (sin.f64 a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (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 (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
#s(approx (* -1/2 (* b (cos a))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (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 (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin 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 (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (-.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 (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (* 1/6 (* b (sin a))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos 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 a) b) -1/2) (sin a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
#s(approx (* (* (cos a) b) -1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (* (cos a) b) (*.f64 b (cos.f64 a)))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
#s(approx (- (* 1/2 (PI)) (+ a b)) (*.f64 #s(literal -1 binary64) a))
#s(approx (- (* 1/2 (PI)) (+ a b)) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (* (+ (/ b a) 1) a) a)
#s(approx (* (+ (/ b a) 1) a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 #s(literal 1 binary64) (/.f64 b a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(literal 1 binary64))
#s(approx (* b (+ (pow a -1) (pow b -1))) (+.f64 #s(literal 1 binary64) (/.f64 b a)))
#s(approx (+ (pow a -1) (pow b -1)) (pow.f64 b #s(literal -1 binary64)))
#s(approx (+ (pow a -1) (pow b -1)) (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) a)
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 a a))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (- a b) a)
#s(approx (- a b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) a)
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 a a))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a) (/.f64 b a)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) a)
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))) a))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b)) (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (/.f64 a b))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b)) (pow.f64 b #s(literal -1 binary64)))))
#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 (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)))
#s(approx (pow (cos a) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 4 binary64)))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
#s(approx (pow (sin a) 2) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 (+.f64 a b))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (neg (+ a b))) (neg.f64 (sin.f64 (+.f64 a b))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) a))
#s(approx (neg (+ a b)) (*.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 a b)) (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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a))))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 b r) (*.f64 #s(literal -1 binary64) (/.f64 r a))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ b (* a (* b b))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 b a) (*.f64 #s(literal -1 binary64) (*.f64 b b))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 #s(literal -1 binary64) (*.f64 a (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 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (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 (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))) a) (*.f64 #s(literal -1 binary64) (*.f64 b b))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))) a))))))
#s(approx (* b (+ a (* 1/3 b))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 b b) a))))))
#s(approx (+ a (* 1/3 b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (+ 1 (* a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) b) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ b (sin (- (* 1/2 (PI)) a))) (/.f64 b (sin.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (- (* 1/2 (PI)) a)) (sin.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (* 1/2 (PI)) a) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)))
#s(approx (- (* 1/2 (PI)) (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) 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 (* (+ (/ b a) 1) a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 b (*.f64 #s(literal -1 binary64) a))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))) a)) #s(literal 1 binary64)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) (*.f64 a b))) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) b)) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) b)) (*.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (neg (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) b)))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (exp (* (log b) 2)) (*.f64 b b))
#s(approx b b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.f64 r (cos.f64 a)))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (/.f64 r (cos.f64 a)))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.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 (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 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/6 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) r)))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))) #s(literal 1/6 binary64))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ b (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ b (* 1/2 (PI))) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (/.f64 (*.f64 b r) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 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/6 binary64) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ b (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ b (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ b (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (sin.f64 a)))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (fma.f64 #s(literal 1/12 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))) #s(literal 1/2 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (*.f64 b (cos.f64 a)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (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)) 2) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 3 binary64)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (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 (* b (+ 1 (* 1/3 (* b b)))) b)
#s(approx (* b (+ 1 (* 1/3 (* b b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (+ 1 (* 1/3 (* b b))) #s(literal 1 binary64))
#s(approx (+ 1 (* 1/3 (* b b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
#s(approx (* 1/3 (* b b)) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) b)
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b 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 (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b 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 (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))))
#s(approx (+ 1/3 (* 2/15 (* b b))) #s(literal 1/3 binary64))
#s(approx (+ 1/3 (* 2/15 (* b b))) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b))))
#s(approx (* 2/15 (* b b)) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) b)
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b 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 (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b 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 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b 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 (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b 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 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (*.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/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) #s(literal 1/3 binary64))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 b b))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* 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 (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))))
#s(approx (+ 2/15 (* 17/315 (* b b))) #s(literal 2/15 binary64))
#s(approx (+ 2/15 (* 17/315 (* b b))) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 b b))))
#s(approx (* 17/315 (* b b)) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (/.f64 b (cos.f64 a)))
#s(approx (+ b (* a (* b b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) b)
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 b (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 a b)))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) b)
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 b (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 a b)))))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (pow.f64 a #s(literal -1 binary64)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (fma.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 b a))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (fma.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (fma.f64 #s(literal 2/3 binary64) b (*.f64 #s(literal 1/3 binary64) (pow.f64 a #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (sin b) (* a (cos b))) (/.f64 b a))
#s(approx (/ (sin b) (* a (cos b))) (*.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 b b) a) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (sin b) (* a (cos b))) (*.f64 b (fma.f64 (*.f64 b b) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 b b) a) (*.f64 #s(literal 1/3 binary64) (pow.f64 a #s(literal -1 binary64)))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (sin b) (* a (cos b))) (*.f64 b (fma.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 b b) a) (*.f64 #s(literal 2/15 binary64) (pow.f64 a #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 a #s(literal -1 binary64)))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* a (cos b)) a)
#s(approx (* a (cos b)) (+.f64 a (*.f64 #s(literal -1/2 binary64) (*.f64 a (*.f64 b b)))))
#s(approx (* a (cos b)) (+.f64 a (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) a (*.f64 #s(literal 1/24 binary64) (*.f64 a (*.f64 b b)))))))
#s(approx (* a (cos b)) (+.f64 a (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) a (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/720 binary64) (*.f64 a (*.f64 b b)) (*.f64 #s(literal 1/24 binary64) a)))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) (*.f64 b b))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 b b)))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 17/45 binary64) (*.f64 b b)))))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 17/45 binary64) (*.f64 #s(literal 62/315 binary64) (*.f64 b b)))))))))
#s(approx (pow (sin b) 2) (*.f64 b b))
#s(approx (pow (sin b) 2) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 b b)))))
#s(approx (pow (sin b) 2) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 b b)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin b) 2) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 b b)))) #s(literal 1/3 binary64))))))
#s(approx (pow (cos b) 2) #s(literal 1 binary64))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 b b))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 b b)) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (*.f64 b b)))) #s(literal 1 binary64)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) b)
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) #s(literal 1 binary64))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b)))))
#s(approx (* b (+ a (* 1/3 b))) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))
#s(approx (* 1/3 b) (*.f64 #s(literal 1/3 binary64) b))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a a)))))
#s(approx (tan b) #s(literal 0 binary64))
#s(approx (tan b) (fma.f64 b #s(literal 1 binary64) #s(literal 0 binary64)))
#s(approx (tan b) (fma.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 b #s(literal 0 binary64)) #s(literal -1 binary64))) #s(literal 0 binary64)) #s(literal 0 binary64)))
#s(approx (tan b) (fma.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b #s(literal -1/3 binary64))) #s(literal 0 binary64)))) #s(literal 0 binary64)) #s(literal 0 binary64)))
#s(approx (+ b (PI)) (PI.f64))
#s(approx (+ b (PI)) (+.f64 b (PI.f64)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (cos a) (* -1 (* b (sin a)))) (cos.f64 a))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (cos.f64 a))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (* (+ (* (* b b) -1/6) 1) b) b)
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (+ (* (* b b) -1/6) 1) #s(literal 1 binary64))
#s(approx (+ (* (* b b) -1/6) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (cos.f64 a))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ 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 (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ 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 (neg (+ 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 (+ (* (neg b) (sin a)) (cos a)) (cos.f64 a))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (cos.f64 a))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* b b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (* -1/2 (* b b)) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (- (* 1/2 (PI)) (+ a b)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (- (* 1/2 (PI)) (+ a b)) (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) b))
#s(approx (pow b -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 a))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (- (* a a) (exp (* (log b) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 b b) (*.f64 a a)))
#s(approx (* -1 (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
#s(approx (- a b) (+.f64 a (*.f64 #s(literal -1 binary64) b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- 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 a) (exp (* (log b) 2))) (- a b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 a))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (- (* a a) (exp (* (log b) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 b b) (*.f64 a a)))
#s(approx (exp (* (log b) 2)) (*.f64 b b))
#s(approx (* (log b) 2) (*.f64 #s(literal 2 binary64) (log.f64 b)))
#s(approx (log b) (log.f64 b))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (*.f64 b (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)) (/.f64 (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.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 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))
#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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 a (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (+.f64 a (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) b))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (/ (PI) b) (/.f64 (PI.f64) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (- (* (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 (* (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 (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (+.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 (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* b b)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* b b)) (*.f64 #s(literal 1/24 binary64) (*.f64 b b)))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (+.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 (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (+.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 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.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 (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (-.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 (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 #s(literal 1/24 binary64) (*.f64 b b)))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(literal 1/24 binary64))
#s(approx (+ 1/24 (* -1/720 (* b b))) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
#s(approx (* -1/720 (* b b)) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (cos b) 3) #s(literal 1 binary64))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (*.f64 b b))))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b b)) #s(literal 3/2 binary64)))))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (*.f64 b b)))) #s(literal 3/2 binary64)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (cos.f64 a)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 7/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal 7/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 7/3 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 #s(literal -1 binary64) (cos.f64 a))) (*.f64 #s(literal -2 binary64) (cos.f64 a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 3/2 binary64) (sin.f64 a)))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))))))) (*.f64 #s(literal -2 binary64) (cos.f64 a))))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (cos.f64 a))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -34/45 binary64) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (fma.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (fma.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (fma.f64 #s(literal -2/3 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (*.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 (* 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) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 b 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))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (sin.f64 a))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.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))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (fma.f64 #s(literal -3/2 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) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (sin.f64 a)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (sin.f64 a))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (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))) (+.f64 (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 (cos.f64 a) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (/ (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 (cos.f64 a) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (cos.f64 a)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 (cos.f64 a) (sin.f64 a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (- (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/9 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -4/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/315 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (*.f64 b (sin.f64 a)) #s(literal 4 binary64)))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal 1/5 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (pow (* (sin a) (sin b)) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -34/945 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 a) #s(literal 4 binary64))) (*.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 b b) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (* (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/9 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -4/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/315 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (cos.f64 a) (sin.f64 a)) #s(literal 2 binary64)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (-.f64 (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (- (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (-.f64 (*.f64 b (fma.f64 b (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (* (pow (sin a) 2) (pow (sin b) 2)) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 a))
#s(approx (+ (* (sin (neg (+ 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 (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.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 (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ 1 (/ 1 (sin b))) b)
#s(approx (/ 1 (/ 1 (sin b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (/ 1 (/ 1 (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 (/ 1 (/ 1 (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 (pow (sin b) -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 b b))))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 b b))))))) b))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (pow.f64 b #s(literal -1 binary64)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
#s(approx (+ 1 (* 1/6 (* b b))) #s(literal 1 binary64))
#s(approx (+ 1 (* 1/6 (* b b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))))
#s(approx (* 1/6 (* b b)) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ 1 (/ 1 (sin b))) b)
#s(approx (/ 1 (/ 1 (sin b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
#s(approx (/ 1 (/ 1 (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 (/ 1 (/ 1 (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 (pow (sin b) -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 b b))))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 b b))))))) b))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (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 (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 b b) r)))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) r)))))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 3 binary64))) (/.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64)))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 r (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 3 binary64))) (/.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 3 binary64))) (/.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))) #s(literal 2 binary64)))) (/.f64 r (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))))
#s(approx (+ (* (sin (neg (+ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a)))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))) (*.f64 b (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (fma.f64 (cos.f64 a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 a))))))
#s(approx (sin (neg (+ a b))) (neg.f64 (sin.f64 a)))
#s(approx (sin (neg (+ a b))) (+.f64 (neg.f64 (sin.f64 a)) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 a)))))
#s(approx (sin (neg (+ a b))) (+.f64 (neg.f64 (sin.f64 a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (neg.f64 (sin.f64 a))))))))
#s(approx (sin (neg (+ a b))) (+.f64 (neg.f64 (sin.f64 a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 a)))))))))
#s(approx (neg (+ a b)) (-.f64 (*.f64 #s(literal -1 binary64) b) 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 (fma.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 (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/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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (/.f64 (*.f64 (*.f64 b b) (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 (*.f64 b b) (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ r (* a (* b r))) (*.f64 b (fma.f64 a r (/.f64 r b))))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a (+ b (* 1/2 (PI)))) b)
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (+ b (* 1/2 (PI))) b)
#s(approx (+ b (* 1/2 (PI))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (sin (+ b (* 1/2 (PI)))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos b) (cos.f64 b))
#s(approx (tan b) (tan.f64 b))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* b (+ 1 (* 1/3 (* b b)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64)))))
#s(approx (+ 1 (* 1/3 (* b b))) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
#s(approx (+ 1 (* 1/3 (* b b))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal 5 binary64))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (+.f64 #s(literal 2/15 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64)) (pow.f64 b #s(literal -4 binary64))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 2/15 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64)) (pow.f64 b #s(literal -4 binary64))))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (+ 1/3 (* 2/15 (* b b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 1/3 (* 2/15 (* b b))) (*.f64 #s(literal 2/15 binary64) (*.f64 b b)))
#s(approx (+ 1/3 (* 2/15 (* b b))) (*.f64 (*.f64 b b) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 7 binary64))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 (pow.f64 b #s(literal 7 binary64)) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 (pow.f64 b #s(literal 7 binary64)) (+.f64 #s(literal 17/315 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64)))))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 (pow.f64 b #s(literal 7 binary64)) (+.f64 #s(literal 17/315 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64)) (pow.f64 b #s(literal -6 binary64)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 17/315 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64)))))))
#s(approx (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 17/315 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64)) (pow.f64 b #s(literal -6 binary64)))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 17/315 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64)))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 17/315 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64)))))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (+ 2/15 (* 17/315 (* b b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 2/15 (* 17/315 (* b b))) (*.f64 #s(literal 17/315 binary64) (*.f64 b b)))
#s(approx (+ 2/15 (* 17/315 (* b b))) (*.f64 (*.f64 b b) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (/.f64 (*.f64 (*.f64 b b) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (*.f64 (*.f64 b b) (+.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))))))
#s(approx (+ b (* a (* b b))) (*.f64 (*.f64 b b) (+.f64 a (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (pow (sin b) 2) (pow (cos b) 2)) (/.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) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/3 binary64) (/.f64 a b))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/3 binary64) (+.f64 (pow.f64 b #s(literal -2 binary64)) (/.f64 a b)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (/.f64 a b))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (+.f64 (pow.f64 b #s(literal -2 binary64)) (/.f64 a b)))))
#s(approx (* b (+ a (* 1/3 b))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (/.f64 a b))))
#s(approx (+ a (* 1/3 b)) (*.f64 b (+.f64 #s(literal 1/3 binary64) (/.f64 a b))))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ b (PI)) b)
#s(approx (+ b (PI)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 (PI.f64) b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (*.f64 b (+.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))))))
#s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (/.f64 (cos.f64 a) (*.f64 b b))) (/.f64 (sin.f64 a) b))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 (*.f64 b b) (-.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/6 binary64))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (/.f64 (cos.f64 a) (pow.f64 b #s(literal 3 binary64))))) (/.f64 (sin.f64 a) (*.f64 b b)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 b b) (sin.f64 a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (cos.f64 a))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (/.f64 (cos.f64 a) (*.f64 b b))) (/.f64 (sin.f64 a) b))))
#s(approx (+ 1 (* -1/2 (* b b))) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
#s(approx (+ 1 (* -1/2 (* b b))) (*.f64 (*.f64 b b) (-.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* 1/2 (PI)) (+ a b)) (*.f64 #s(literal -1 binary64) b))
#s(approx (- (* 1/2 (PI)) (+ a b)) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* b (+ (pow a -1) (pow b -1))) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 a a) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (- a b) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 a a) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (* (log b) 2) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 b))))
#s(approx (log b) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) b)
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (- (* 1/24 (* b b)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 b b)))
#s(approx (- (* 1/24 (* b b)) 1/2) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64)) (pow.f64 b #s(literal -6 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (+ 1/24 (* -1/720 (* b b))) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
#s(approx (+ 1/24 (* -1/720 (* b b))) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal -2 binary64))) #s(literal 1/720 binary64))))
#s(approx (pow (cos b) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (/ 1 (/ 1 (sin b))) (sin.f64 b))
#s(approx (pow (sin b) -1) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (*.f64 #s(literal 1/6 binary64) b))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (*.f64 b (+.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal -2 binary64)))))
#s(approx (+ 1 (* 1/6 (* b b))) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
#s(approx (+ 1 (* 1/6 (* b b))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal -2 binary64)))))
#s(approx (/ 1 (/ 1 (sin b))) (sin.f64 b))
#s(approx (pow (sin b) -1) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (neg (+ a b)) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 b (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 b (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 a r) (*.f64 #s(literal -1 binary64) (/.f64 r b))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (+ b (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (sin (+ b (* 1/2 (PI)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ 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) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* 2/15 (* b b)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64))) (*.f64 b b))) #s(literal 2/15 binary64)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64)))) (*.f64 b b))) #s(literal 17/315 binary64)))))
#s(approx (* b (+ 1 (* (* b b) (+ 1/3 (* (* b b) (+ 2/15 (* 17/315 (* b b)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal -2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 #s(literal 17/315 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal -2 binary64))))))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1/3 binary64)))))
#s(approx (* b (+ 1 (* b (+ a (* 1/3 b))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (pow.f64 b #s(literal -1 binary64))) b)) #s(literal 1/3 binary64)))))
#s(approx (+ 1 (* b (+ a (* 1/3 b)))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) (pow.f64 b #s(literal -1 binary64))) b)))))
#s(approx (+ a (* 1/3 b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1/3 binary64)))))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a a)) #s(literal 1 binary64)))))
#s(approx (tan b) (tan.f64 (-.f64 (PI.f64) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ b (PI)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.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))))))
#s(approx (+ 1 (* a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) a) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 a) (/.f64 (sin.f64 a) b)))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal -2 binary64))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 a) (/.f64 (sin.f64 a) b)) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* (* (cos a) b) -1/2) (sin a)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 a) (/.f64 (sin.f64 a) b)))))
#s(approx (sin (- (* 1/2 (PI)) (+ a b))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)))
#s(approx (- (* 1/2 (PI)) (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) 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 (* (+ (/ b a) 1) a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (cos (/ (- (* a a) (exp (* (log b) 2))) (- a b))) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* (log b) 2) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) b) #s(literal -1 binary64))))))
#s(approx (log b) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) b) #s(literal -1 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 a b) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b))) #s(literal 1 binary64)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) (PI.f64))) b))))
#s(approx (+ (* 1/2 (/ (PI) b)) (/ a b)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) (PI.f64))) b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) a)) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) a)) (*.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (neg (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) a)))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#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)))))

eval925.0ms (7.3%)

Memory
37.4MiB live, 2 112.4MiB allocated; 253ms collecting garbage
Compiler

Compiled 390 818 to 23 552 computations (94% saved)

prune376.0ms (3%)

Memory
-6.4MiB live, 794.9MiB allocated; 68ms collecting garbage
Pruning

101 alts after pruning (70 fresh and 31 done)

PrunedKeptTotal
New5 746705 816
Fresh000
Picked402565
Done167
Total5 7871015 888
Accuracy
100.0%
Counts
5 888 → 101
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶77.8%
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
✓99.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
▶58.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
▶59.7%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
✓57.4%
(/.f64 (*.f64 (sin.f64 b) r) #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)))
✓58.0%
(/.f64 (*.f64 (sin.f64 b) r) #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)))
▶54.0%
(/.f64 (*.f64 #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)))))) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
▶56.4%
(/.f64 #s(approx (* (sin b) r) (*.f64 b r)) #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))))))
✓99.5%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶57.4%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
▶53.7%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
▶99.3%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
▶99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
▶57.9%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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))))))
✓99.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶53.9%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
▶53.9%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
▶54.0%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))))
▶38.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶37.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶38.0%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓58.5%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶58.0%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))))
✓59.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶36.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶35.9%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶8.7%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))))
▶21.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))))
✓14.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
✓8.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
✓15.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
✓32.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
✓43.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
▶19.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))))
✓43.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
▶41.4%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))))
▶43.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))))
✓57.4%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
✓39.3%
(*.f64 r (/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
✓36.8%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
▶54.2%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))))
▶53.9%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
▶53.4%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))))
✓53.7%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
▶30.3%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
▶32.2%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
▶2.8%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))))
▶30.7%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
▶30.9%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
▶31.6%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
▶32.6%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
▶53.3%
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
▶32.6%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
✓54.6%
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
▶54.4%
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))))
▶33.3%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
▶31.5%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
▶32.0%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
▶56.8%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))))
▶6.5%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
▶99.3%
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))))
✓55.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
✓53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
▶31.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
✓31.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
▶9.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
▶53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
▶16.2%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
▶29.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
✓29.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
▶7.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
✓57.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
✓25.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
▶11.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
✓32.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
▶56.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
▶31.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
✓32.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
✓32.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
✓32.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
▶16.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
✓53.4%
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
▶98.9%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
✓99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
▶99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
▶99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
▶61.0%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
▶18.9%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
▶18.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 (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))))
▶53.4%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
▶41.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
▶27.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
▶16.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
✓53.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
▶31.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
▶8.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
▶9.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
▶23.2%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
▶30.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
▶16.2%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
Compiler

Compiled 4 930 to 2 566 computations (48% saved)

series923.0ms (7.3%)

Memory
83.9MiB live, 1 451.4MiB allocated; 375ms collecting garbage
Counts
522 → 2 169
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))
(*.f64 a (*.f64 (*.f64 b b) r))
a
(*.f64 (*.f64 b b) r)
(*.f64 b b)
b
r
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))
(*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))
(fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))
(/.f64 (*.f64 b r) a)
(*.f64 b r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))
(*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b)))
(fma.f64 a r (/.f64 r b))
(/.f64 r b)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
#s(literal -1/2 binary64)
(*.f64 a a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))))))
(/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))
#s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
(*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))
#s(literal -1/720 binary64)
(pow.f64 a #s(literal 6 binary64))
#s(literal 6 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
(*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))))
(/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 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) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
(*.f64 #s(literal -1/720 binary64) (*.f64 a a))
#s(literal 1/2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r))))
#s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))
(*.f64 a (*.f64 b r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))))
(*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))))
(*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))
(/.f64 r (*.f64 b (cos.f64 a)))
(*.f64 b (cos.f64 a))
(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 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 b)
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
(sin.f64 b)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a)))
(*.f64 r (sin.f64 b))
(sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))
#s(approx (+ a (+ b (* 1/2 (PI)))) 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)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b)))
(sin.f64 #s(approx (+ b (* 1/2 (PI))) b))
#s(approx (+ b (* 1/2 (PI))) 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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.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 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64)))
#s(approx (tan b) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))
(*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))
(/.f64 b a)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))
(*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
(/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))
(*.f64 a (cos.f64 b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))
(*.f64 (*.f64 a a) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64))))
(tan.f64 #s(approx (+ b (PI)) (PI.f64)))
#s(approx (+ b (PI)) (PI.f64))
(PI.f64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(+.f64 (+.f64 b (PI.f64)) (PI.f64))
(+.f64 b (PI.f64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b)))
#s(approx (+ 1 (* a b)) (*.f64 a b))
(*.f64 a b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))))))
(/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))
(*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))
(*.f64 #s(literal 1/24 binary64) (*.f64 a a))
#s(literal 1/24 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.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 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))
#s(literal -1 binary64)
(*.f64 b (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
(*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))
(fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))
(/.f64 (cos.f64 a) b)
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
(*.f64 #s(literal -1 binary64) (*.f64 a b))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/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)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))
(*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))
(*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/6 binary64) (*.f64 a b))
#s(literal 1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/2 binary64) (*.f64 b b))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))
(-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))
(*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b))
#s(approx (* b (cos a)) b)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/6 binary64) (*.f64 b b))
#s(literal -1/6 binary64)
#s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#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))))))
(*.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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)))
(-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))
(*.f64 #s(literal 1/120 binary64) (*.f64 b b))
#s(literal 1/120 binary64)
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/720 binary64) (*.f64 b b))
(*.f64 (sin.f64 b) (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
#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(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
(+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))
(*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))
(fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) a)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (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)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
(*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))
(*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))
(pow.f64 b #s(literal 3 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b 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(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #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)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))
(*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))
(fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))))
#s(literal 1/4 binary64)
(*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/36 binary64) (*.f64 b b))
#s(literal -1/36 binary64)
(*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))
(*.f64 #s(literal 1/6 binary64) (*.f64 b b))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))
(-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a))
(*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))
(*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)
#s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))))
(*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(/.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)
#s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))))
(*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))
#s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))
(pow.f64 a #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b))))
(cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))
(/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 (log.f64 b) #s(literal 2 binary64))
(log.f64 b)
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))))
(*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))
(*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))
(*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))
(-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))
(/.f64 (PI.f64) b)
(pow.f64 b #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))))
(*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64)))
#s(approx (cos b) #s(literal 1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a)))
(cos.f64 (-.f64 b a))
(-.f64 b a)
(cos.f64 (+.f64 b a))
(+.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 a)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a))))
(-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))
(*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 b b))
(*.f64 #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)))))) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))
(*.f64 #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)))))) (sin.f64 a))
#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))))))
(*.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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/5040 binary64) (*.f64 b b))
#s(literal -1/5040 binary64)
(*.f64 r (/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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))))))
(/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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)))))
(/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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 (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (+ (* (* (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)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))
(pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))
(fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 #s(approx (* (sin b) r) (*.f64 b r)) #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 (* (sin b) r) (*.f64 b r))
#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)))))
(+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(/.f64 (*.f64 #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)))))) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 #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)))))) r)
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 b) r)
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(sin.f64 (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
(+.f64 a b)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))
(cos.f64 (+.f64 a b))
Outputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* r (+ b (* a (pow b 2))))))
#s(approx (* a (* (* b b) r)) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* (* b b) r) #s(hole binary64 (* (pow b 2) r)))
#s(approx r #s(hole binary64 r))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* a (* r (+ (/ b a) (pow b 2))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* r (+ (/ b a) (pow b 2)))))
#s(approx (/ (* b r) a) #s(hole binary64 (/ (* b r) a)))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* (pow b 2) (* r (+ a (/ 1 b))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* r (+ a (/ 1 b)))))
#s(approx (/ r b) #s(hole binary64 (/ r b)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* r (+ 1 (* a b)))))
#s(approx (* a (* b r)) #s(hole binary64 (* a (* b r))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r (* b (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 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* r (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ r (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (- a b))) (/ (pow b 2) (- a b)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* 1/2 (- (cos (- b a)) (cos (+ a b))))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (* (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos (+ a b)) (* (cos (* 1/2 (PI))) (sin (neg (+ a b))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a))))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* r (+ (* -1 b) (* -1 (* a (pow b 2))))))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* -1 (* a (* r (+ (* -1 (/ b a)) (* -1 (pow b 2))))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* -1 (* r (+ (* -1 (/ b a)) (* -1 (pow b 2)))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* -1 (* (pow b 2) (* r (- (* -1 a) (/ 1 b)))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* -1 (* r (- (* -1 a) (/ 1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a)))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* r (- (* -1 (* a b)) 1)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx a #s(hole binary64 a))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* b r)))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (/ (* b r) a)))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (/ (+ (* a (* (pow b 2) r)) (* b r)) a)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* b r)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (/ r b)))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (* -1/2 (* a a)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (* -1/720 (pow a 6)) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (pow a 6) #s(hole binary64 (pow a 6)))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2))))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (+ 1/24 (* -1/720 (pow a 2)))))
#s(approx (* -1/720 (* a a)) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 r))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 r))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* a (+ (* 1/2 r) (* a (* b (- (* -1/6 r) (* -1 r)))))) (* b r))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* 1/2 (/ (* a r) b)))) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* a (- (* a (- (* -1/6 r) (* -1 r))) (* -1/2 (/ r b)))))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r b)))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) r) b)) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (/ r b)) (+ (* 1/48 (/ r b)) (* 1/2 (+ (* -1/4 (/ r b)) (* 1/24 (/ r b)))))))) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (* b (cos a)) #s(hole binary64 b))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 b))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (+ b (* -1 (* (pow a 2) b)))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1 b) (* 1/3 (* (pow a 2) b)))))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1 b) (* (pow a 2) (+ (* -2/45 (* (pow a 2) b)) (* 1/3 b))))))))
#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) (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 (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)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (* (pow (cos a) 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 (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b))))))) (pow (cos b) 6)) (/ (* r (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 7)))))) (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b))))))) (pow (cos b) 6)) (/ (* r (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 7)))))) (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ r (pow (cos b) 2))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (/ r (pow (cos b) 2)) (/ (* a (* r (sin b))) (pow (cos b) 3)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 4))) (/ (* r (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (* r (sin b)) (pow (cos b) 3))))) (/ r (pow (cos b) 2)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 4))) (+ (/ (* r (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 5)) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 4))) (/ (* r (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4)))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 4))) (/ (* r (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (* r (sin b)) (pow (cos b) 3))))) (/ r (pow (cos b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* -1 (* a (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* -1 (pow (cos b) 2))) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (cos b) (sin b))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* (cos b) (sin b)) (* (pow a 2) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (* (cos b) (sin b))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* (cos b) (sin b)) (* (pow a 2) (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 2))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (* (cos b) (sin b))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* (cos b) (sin b)) (* (pow a 2) (- (+ (* a (- (+ (* -2 (/ (pow (sin b) 4) (pow (cos b) 2))) (* a (- (/ (* (sin b) (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (pow (cos b) 3)) (+ (* -3/2 (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (* (cos b) (sin b))))) (* 7/8 (* (cos b) (sin b))))))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 2))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (* (cos b) (sin b))))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* (pow (cos b) 4) (sin b))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (+ (* (pow a 2) (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 4) (sin b)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (* a (* (cos b) (pow (sin b) 4)))) (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 4) (sin b)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* a (+ (* -2 (* (cos b) (pow (sin b) 4))) (* a (* (sin b) (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))))) (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 4) (sin b)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow a 2) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (* a (* (cos b) (pow (sin b) 3)))) (* -2 (pow (cos b) 4))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (pow (cos b) 4)) (* a (- (* a (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* 2 (* (cos b) (pow (sin b) 3)))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos b) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (/ (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 (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (* a (cos b)) #s(hole binary64 (* a (cos b))))
#s(approx (/ b (cos a)) #s(hole binary64 b))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 b) (+ (* 1/48 b) (* 1/2 (+ (* -1/4 b) (* 1/24 b))))))) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (* 1/2 (* (* a a) b)) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (* (* a a) b) #s(hole binary64 (* (pow a 2) b)))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* 1/2 (* a b)) (pow b 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* a (+ (* 1/2 b) (* a (* b (- (* -1/6 b) (* -1 b)))))) (pow b 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 1))
#s(approx (+ 1 (* a b)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (* a b) #s(hole binary64 (* a b)))
#s(approx (/ 1 (cos a)) #s(hole binary64 1))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (* 1/24 (* a a)) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b)))))) (pow (cos b) 6)) (/ (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 7)))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #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)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b)))))) (pow (cos b) 6)) (/ (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 7)))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ (sin b) (pow (cos b) 2))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (/ (sin b) (pow (cos b) 2)) (/ (* a (pow (sin b) 2)) (pow (cos b) 3)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 4))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 3))))) (/ (sin b) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 4))) (+ (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 4))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4)))) (cos b)) (/ (* (pow (sin b) 2) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 5)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 4))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 3))))) (/ (sin b) (pow (cos b) 2)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos b) (* (pow a 2) (- (* -2 (cos b)) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos b) (* (pow a 2) (- (+ (* -2 (cos b)) (* a (- (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 2)))))) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos b) (* (pow a 2) (- (+ (* -2 (cos b)) (* a (- (+ (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (* a (- (* 5/3 (cos b)) (+ (* -3/2 (- (* -2 (cos b)) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (cos b))))) (+ (* 7/8 (cos b)) (+ (* 2 (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 2))) (/ (pow (sin b) 4) (pow (cos b) 3)))))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 2)))))) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 1))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* 1/6 (* (pow a 2) b))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* -1/120 (* (pow a 2) b)) (* 1/6 b)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* 1/6 b) (* (pow a 2) (+ (* -1/120 b) (* 1/5040 (* (pow a 2) b))))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a b)))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* -1/6 (* (pow a 2) b))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* 1/120 (* (pow a 2) b))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) b)) (* 1/120 b)))))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 1))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* -1 a) (/ 1 b))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* a (- (* -1/2 (/ a b)) 1)) (/ 1 b))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* a (- (* a (- (* 1/6 a) (* 1/2 (/ 1 b)))) 1)) (/ 1 b))))
#s(approx (/ (cos a) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (cos a) b) #s(hole binary64 (+ (* -1/2 (/ (pow a 2) b)) (/ 1 b))))
#s(approx (/ (cos a) b) #s(hole binary64 (+ (* (pow a 2) (- (* 1/24 (/ (pow a 2) b)) (* 1/2 (/ 1 b)))) (/ 1 b))))
#s(approx (/ (cos a) b) #s(hole binary64 (+ (* (pow a 2) (- (* (pow a 2) (+ (* -1/720 (/ (pow a 2) b)) (* 1/24 (/ 1 b)))) (* 1/2 (/ 1 b)))) (/ 1 b))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (* -1 (* a b)) #s(hole binary64 (* -1 (* a b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 1))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* a (+ (* -1 b) (* -1/2 a)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1 b)))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* -1/2 a)))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* a (- (* 1/6 (* a b)) 1/2))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (* 1/6 (* a b)) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1 (* a b)) (* -1/2 (pow b 2)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* 1/4 (* a (pow b 2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (+ (* 1/6 (* a b)) (* 1/4 (pow b 2)))))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 b)))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (cos (+ a 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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 1))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#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 (* (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 (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 1))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* a (+ (* -1 b) (* -1/2 a)))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1 b)))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (* -1/2 a) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* 1/6 (* a (pow b 3)))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* a (+ (* -1/36 (* (pow a 2) (pow b 3))) (* 1/6 (pow b 3))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* a (+ (* 1/6 (pow b 3)) (* (pow a 2) (+ (* -1/36 (pow b 3)) (* 1/720 (* (pow a 2) (pow b 3)))))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* a (+ (* 1/6 (pow b 3)) (* (pow a 2) (+ (* -1/36 (pow b 3)) (* (pow a 2) (+ (* -1/30240 (* (pow a 2) (pow b 3))) (* 1/720 (pow b 3))))))))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (pow b 3))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (pow b 3))) (pow b 3)))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (+ (* (pow a 2) (+ (* -1/6 (pow b 3)) (* 1/120 (* (pow a 2) (pow b 3))))) (pow b 3)))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (+ (* (pow a 2) (+ (* -1/6 (pow b 3)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (pow b 3))) (* 1/120 (pow b 3)))))) (pow b 3)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (* b (- (* 1/6 (pow b 2)) 1)))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* 1/4 (pow b 2)) 1/2)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* 1/4 (pow b 2))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2))))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* 1/4 (* a (pow b 2))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2))))))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/6 (pow b 2)) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* 1/4 (* a b))) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* a (+ (* 1/4 b) (* a (+ 1/6 (* -1/36 (pow b 2))))))) 1)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 b)))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* 1/6 (* a (pow b 2))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* 1/4 (* a b)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* a (+ (* -1/36 (* a (pow b 2))) (* 1/4 b))))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* 1/4 a))) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* a (+ 1/4 (* -1/36 (* a b)))))) 1/2)))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ b a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ (+ a b) a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ 1 (/ a b)) #s(hole binary64 1))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#s(approx (pow a -1) #s(hole binary64 (/ 1 a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* b (+ 1 (* 1/2 (/ (PI) b)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* -1 (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (+ (* -1 (+ 1 (* 1/2 (/ (PI) b)))) (* -1 (/ a b)))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ (+ (* -1 (+ 1 (* 1/2 (/ (PI) b)))) (* -1 (/ a b))) a)))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (/ (+ 1 (* 1/2 (/ (PI) b))) a)))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))) (sin (- (* 1/2 (PI)) (* -1 b))))) (+ (* -1/6 (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (* 1/2 (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b))))))) (sin (- (* 1/2 (PI)) (* -1 b))))) (+ (* -1/6 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (* 1/2 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))))))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* -1 b))) (* a (cos (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* -1 b))) (* a (+ (cos (- (* 1/2 (PI)) (* -1 b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) (* -1 b))))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* -1 b))) (* a (+ (cos (- (* 1/2 (PI)) (* -1 b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) (* -1 b)))) (* -1/6 (* a (cos (- (* 1/2 (PI)) (* -1 b))))))))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (* -1 b))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (- (+ a (* 1/2 (PI))) (* -1 b))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* a (* r (* (sin b) (- (sin b) (* -1 (sin b)))))) (pow (cos b) 2))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* -1/4 (/ (* r (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2))) (pow (cos b) 3)))))) (* -1/2 (/ (* r (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (sin b) (- (* -1/6 (sin b)) (* 1/6 (sin b))))) (pow (cos b) 2))) (+ (* -1/4 (/ (* r (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))) (* 1/2 (/ (* (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* -1/4 (/ (* r (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2))) (pow (cos b) 3)))) (- (sin b) (* -1 (sin b)))) (cos b))))))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* -1/4 (/ (* r (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2))) (pow (cos b) 3)))))) (* -1/2 (/ (* r (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (+ (* 1/2 (/ (* a (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1/2 (/ (sin b) (cos b))) (* -1/4 (/ (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2)) (pow (cos b) 3)))))) (* -1/2 (/ (* (sin b) (- (sin b) (* -1 (sin b)))) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* (sin b) (- (* -1/6 (sin b)) (* 1/6 (sin b)))) (pow (cos b) 2))) (+ (* -1/4 (/ (* (sin b) (- (sin b) (* -1 (sin b)))) (pow (cos b) 2))) (* 1/2 (/ (* (+ (* -1/2 (/ (sin b) (cos b))) (* -1/4 (/ (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2)) (pow (cos b) 3)))) (- (sin b) (* -1 (sin b)))) (cos b))))))) (+ (* -1/2 (/ (sin b) (cos b))) (* -1/4 (/ (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2)) (pow (cos b) 3)))))) (* -1/2 (/ (* (sin b) (- (sin b) (* -1 (sin b)))) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (+ (cos b) (* -1/2 (* a (- (sin b) (* -1 (sin b))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (* 1/2 (- (sin b) (* -1 (sin b)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* -1/2 (* a (- (* -1/6 (sin b)) (* 1/6 (sin b))))))) (* 1/2 (- (sin b) (* -1 (sin b)))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (* a (- (sin b) (* -1 (sin b)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* a (+ (* 1/2 (* (pow a 2) (- (* -1/6 (sin b)) (* 1/6 (sin b))))) (* 1/2 (- (sin b) (* -1 (sin b))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* a (+ (* 1/2 (- (sin b) (* -1 (sin b)))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/120 (sin b)) (* -1/120 (sin b))))) (* 1/2 (- (* -1/6 (sin b)) (* 1/6 (sin b))))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* a (+ (* 1/2 (- (sin b) (* -1 (sin b)))) (* (pow a 2) (+ (* 1/2 (- (* -1/6 (sin b)) (* 1/6 (sin b)))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/5040 (sin b)) (* 1/5040 (sin b))))) (* 1/2 (- (* 1/120 (sin b)) (* -1/120 (sin b))))))))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (sin b) (* -1 (sin b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (+ (sin b) (* (pow a 2) (- (* -1/6 (sin b)) (* 1/6 (sin b))))) (* -1 (sin b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (+ (sin b) (* (pow a 2) (- (+ (* -1/6 (sin b)) (* (pow a 2) (- (* 1/120 (sin b)) (* -1/120 (sin b))))) (* 1/6 (sin b))))) (* -1 (sin b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (+ (sin b) (* (pow a 2) (- (+ (* -1/6 (sin b)) (* (pow a 2) (- (+ (* 1/120 (sin b)) (* (pow a 2) (- (* -1/5040 (sin b)) (* 1/5040 (sin b))))) (* -1/120 (sin b))))) (* 1/6 (sin b))))) (* -1 (sin b))))))
#s(approx (cos (- b a)) #s(hole binary64 (cos b)))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos b) (* a (sin b)))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (* -1 (sin b)))))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* -1/6 (* a (sin b))))) (* -1 (sin b)))))))
#s(approx (- b a) #s(hole binary64 b))
#s(approx (- b a) #s(hole binary64 (+ b (* -1 a))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos b)))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* a (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* a (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* a (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (* (cos a) (cos 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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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 (* (sin a) (sin b)) 2) (* (sin a) (sin b))) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (* (sin a) (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) (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) (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) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))))) (pow (cos b) 11)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 12))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -2 (* (pow (cos b) 7) (pow (sin b) 3))) (* (pow (cos b) 7) (pow (sin b) 3))))) (pow (cos b) 11)) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))))) (pow (cos b) 11)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 12))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 9) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 9/2 (* (pow (cos b) 10) (sin b)))))) (pow (cos b) 12)) (/ (* r (* (pow (sin b) 2) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 13)))))) (/ (* r (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))))) (pow (cos b) 11))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 12))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 11)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 12))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (/ (* (sin b) (+ (* -2 (* (pow (cos b) 7) (pow (sin b) 3))) (* (pow (cos b) 7) (pow (sin b) 3)))) (pow (cos b) 11)) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 11)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 12))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 9) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 9/2 (* (pow (cos b) 10) (sin b))))) (pow (cos b) 12)) (/ (* (pow (sin b) 2) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 13)))))) (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 11))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 12))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos b)))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -9/2 (cos b)) (* -1 (cos b))) (+ (* -3 (cos b)) (* -2 (cos b))))))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -9/2 (cos b)) (+ (* -1 (cos b)) (* a (- (+ (* -1 (/ (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))) (cos b))) (* 9/2 (sin b))) (+ (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 10))) (/ (pow (sin b) 3) (pow (cos b) 2)))))))) (+ (* -3 (cos b)) (* -2 (cos b))))))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow a 2) (- (* -9/2 (pow (cos b) 3)) (* -3 (pow (cos b) 3)))) (pow (cos b) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -9/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3)))) (* -3 (pow (cos b) 3)))) (pow (cos b) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -9/2 (pow (cos b) 3)) (* a (- (* a (- (* 75/8 (pow (cos b) 3)) (+ (* -3 (- (* -9/2 (pow (cos b) 3)) (* -3 (pow (cos b) 3)))) (* 4 (pow (cos b) 3))))) (pow (sin b) 3)))) (* -3 (pow (cos b) 3)))) (pow (cos b) 3))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (pow (cos b) 9)))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* -9/2 (* (pow a 2) (pow (cos b) 9))) (pow (cos b) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* 75/8 (* (pow a 2) (pow (cos b) 9))))) (pow (cos b) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* (pow a 2) (+ (* -961/80 (* (pow a 2) (pow (cos b) 9))) (* 75/8 (pow (cos b) 9)))))) (pow (cos b) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (pow (cos b) 9)))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* -9/2 (* (pow a 2) (pow (cos b) 9))) (pow (cos b) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* 75/8 (* (pow a 2) (pow (cos b) 9))))) (pow (cos b) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* (pow a 2) (+ (* -961/80 (* (pow a 2) (pow (cos b) 9))) (* 75/8 (pow (cos b) 9)))))) (pow (cos b) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (pow (sin b) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (+ (* -3/2 (* (pow a 2) (pow (sin b) 9))) (pow (sin b) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (+ (* (pow a 2) (+ (* -3/2 (pow (sin b) 9)) (* 43/40 (* (pow a 2) (pow (sin b) 9))))) (pow (sin b) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (+ (* (pow a 2) (+ (* -3/2 (pow (sin b) 9)) (* (pow a 2) (+ (* -2473/5040 (* (pow a 2) (pow (sin b) 9))) (* 43/40 (pow (sin b) 9)))))) (pow (sin b) 9)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (pow (cos b) 6)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (* (pow (cos b) 3) (pow (sin b) 3))))) (pow (cos b) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (+ (* 4 (* a (pow (cos b) 6))) (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (cos b) 6))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* a (pow (sin b) 6))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* a (+ (* a (+ (* 13/120 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 3/4 (* (pow (cos b) 3) (pow (sin b) 3))) (* 7/8 (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (sin b) 6)))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* (pow a 2) (+ (* 13/120 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 3/4 (* (pow (cos b) 3) (pow (sin b) 3))) (* 7/8 (* (pow (cos b) 3) (pow (sin b) 3))))))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* (pow a 2) (+ (* 13/120 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 3/4 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 7/8 (* (pow (cos b) 3) (pow (sin b) 3))) (* (pow a 2) (+ (* -7/16 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -61/240 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -13/80 (* (pow (cos b) 3) (pow (sin b) 3))) (* -41/3024 (* (pow (cos b) 3) (pow (sin b) 3)))))))))))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -2 (pow (cos b) 2)) (* a (- (* -2 (/ (pow (sin b) 3) (cos b))) (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (* (sin b) (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (cos b))))))) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (* a (* (cos b) (pow (sin b) 3)))) (* -2 (pow (cos b) 4))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (pow (cos b) 4)) (* a (- (* a (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* 2 (* (cos b) (pow (sin b) 3)))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* a (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* -1 (pow (cos b) 2))) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))) (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)) 2))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (+ (* -1 (/ (* (+ (* -1 (/ (* r (* (sin b) (pow (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)) 2))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))))) (/ (* r (* (sin b) (- (* 1/6 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1/6 (sin b))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)) 2))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (+ (* a (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (+ (* a (- (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* a (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (sin b))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (+ (* a (- (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* a (+ (* -1/2 (cos b)) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b)))) (* a (- (* 1/6 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1/6 (sin b)))))))) (sin b))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg b))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* -1 (* a (cos (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* -1/2 (* a (sin (neg b)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* a (+ (* -1/2 (sin (neg b))) (* 1/6 (* a (cos (neg b)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos b)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (+ (* (pow b 2) r) (/ (* b r) a))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* a r)))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* a (+ r (/ r (* a b))))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow a 2)) 1/2))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (+ (* 1/24 (/ 1 (pow a 2))) (/ 1 (pow a 6))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* (pow a 2) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (* b r))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (+ (* b r) (/ r a)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (* b (cos a)) #s(hole binary64 (* b (cos a))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 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 (sin a) #s(hole binary64 (sin a)))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 a))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (pow (cos a) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))))
#s(approx (/ b (cos a)) #s(hole binary64 (/ b (cos a))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 b) (/ b (pow a 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a b)))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a (+ b (/ 1 a)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- (+ 1/24 (/ 1 (pow a 4))) (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* (pow a 2) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ (sin b) (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (- (* (pow (cos a) 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))) (+ (* (* (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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* -1 (sin a)) (/ (cos a) b))))
#s(approx (/ (cos a) b) #s(hole binary64 (/ (cos a) b)))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* -1 (* a b))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* a (+ (* -1 b) (/ 1 a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* 1/6 (* (pow a 3) b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* (pow a 3) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (/ b (pow a 2))) (* 1/6 b)) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (/ b (pow a 2))) (+ (* 1/6 b) (/ 1 (pow a 3)))) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* 1/6 (* (pow a 3) b))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* (pow a 3) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (/ b (pow a 2))) (* 1/6 b)) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* 1/6 (* (pow a 2) b))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* (pow a 2) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ b (pow a 2))) (* 1/6 b)) (* 1/2 (/ 1 a))))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* 1/6 (* (pow a 2) b))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* a (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (- (* -1/2 (* b (cos a))) (sin a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#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 (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* (pow a 2) (- (* -1 (/ b a)) 1/2))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ b a)) (/ 1 (pow a 2))) 1/2))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* (pow a 2) (- (* -1 (/ b a)) 1/2))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1/2))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* (pow b 3) (sin a))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1/2 (/ (pow b 2) (pow a 3))) (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (+ (/ 1 (pow a 3)) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1/2 (/ (pow b 2) (pow a 3))) (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2))))) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow a 3) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* a (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* a (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 1))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (/ a b)))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (* a (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 a))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* a (+ 1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (/ a b)))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* -1 (/ a b))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b)))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ -1 b)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (- a b))) (/ (pow b 2) (- a b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (- a b))) (/ (pow b 2) (- a b))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (+ 1 (* 1/2 (/ (PI) a))) (* -1 (/ b a))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (+ 1 (+ (* -1 (/ (+ (* -1 (pow b 2)) (pow b 2)) (pow a 2))) (* 1/2 (/ (PI) a)))) (* -1 (/ b a))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* 1/2 (- (cos (- b a)) (cos (+ a b))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (* (cos a) (cos b)) (* 1/2 (- (cos (- b a)) (cos (+ a b)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (- b a)) (cos (+ a b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (- b a)) (cos (+ a b)))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (- b a))))
#s(approx (- b a) #s(hole binary64 (* -1 a)))
#s(approx (- b a) #s(hole binary64 (* a (- (/ b a) 1))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (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 b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 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 (* (sin a) (sin b)) 2) (* (sin a) (sin b))) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (* (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))) (* (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (/ (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9))) (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (* (pow (cos a) 9) (pow (cos b) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow (sin a) 9) (pow (sin b) 9))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (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)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (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)))) (* (pow (sin a) 6) (pow (sin b) 6)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos (+ a b)) (* (cos (* 1/2 (PI))) (sin (neg (+ a b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg (+ a b)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (* (cos (+ a b)) 1) #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 (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* -1 (* a (+ (* -1 r) (* -1 (/ r (* a b))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* a (+ (* -1 (* b r)) (* -1 (/ r a)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* a (- (* -1 b) (/ 1 a))))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* -1 (* a (- b (/ 1 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1/6 b) (* 1/2 (/ 1 a)))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (* -1 (/ b a)) 1/2) a)) (* -1/6 b))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (* -1 (/ (- b (/ 1 a)) a)) 1/2) a)) (* -1/6 b))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1/6 b) (* 1/2 (/ 1 a)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (* -1 (/ b a)) 1/2) a)) (* -1/6 b))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ 1/2 (/ b a)) a)) (* 1/6 b)))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/6 b) (* 1/2 (/ 1 a)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* (pow a 2) (- (* -1 (/ (- b (/ 1 a)) a)) 1/2))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1 (* a (+ 1/2 (/ b a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* 1/4 (pow b 2)) (/ (* b (- (* 1/6 (pow b 2)) 1)) a)) 1/2) a)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (* b (- (* 1/6 (pow b 2)) 1))) (* -1 (/ (+ 1 (* -1/2 (pow b 2))) a))) a)) (* 1/4 (pow b 2))) 1/2) a)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* 1/4 (pow b 2)) (/ (* b (- (* 1/6 (pow b 2)) 1)) a)) 1/2) a)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (* b (- (* 1/6 (pow b 2)) 1))) (* 1/2 (/ (pow b 2) a))) a)) (* 1/4 (pow b 2))) 1/2) a)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* 1/4 (pow b 2)) (/ (* b (- (* 1/6 (pow b 2)) 1)) a)) 1/2) a)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (* -1 (- (* 1/4 (pow b 2)) 1/2)) (* -1 (/ (* b (- (* 1/6 (pow b 2)) 1)) a))) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1 (* a (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1/4 (/ (pow b 2) a)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))) (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))) (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))) (* 1/2 (PI))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (* (cos a) (cos b)) (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a)))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a))))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (+ b (* -1 a)))))
#s(approx (- b a) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ b a)))))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 a) (* 1/2 (PI))))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos (- b (* -1 a))) (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos (- b (* -1 a))) (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 a) b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* b (+ (* b r) (/ r a)))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (/ (+ r (* a (* b r))) b)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))) 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 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (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 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#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 (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* b r) (sin (* 1/2 (PI))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (cos (* 1/2 (PI))) (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI)))))))) (* -1/6 (/ r (sin (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (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 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (* (pow (cos a) 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 (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (cos b) 3) #s(hole binary64 1))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (* -2 (/ (* r (pow (sin a) 3)) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 7)) (/ (* r (+ (* -1 (* (pow (cos a) 2) (pow (sin a) 3))) (+ (* -1 (* (pow (cos a) 4) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 3/2 (* (pow (cos a) 4) (sin a)))))) (pow (cos a) 6)))))) (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (* -2 (/ (* r (pow (sin a) 3)) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 7)) (/ (* r (+ (* -1 (* (pow (cos a) 2) (pow (sin a) 3))) (+ (* -1 (* (pow (cos a) 4) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 3/2 (* (pow (cos a) 4) (sin a)))))) (pow (cos a) 6)))))) (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ r (pow (cos a) 2))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (/ r (pow (cos a) 2)) (/ (* b (* r (sin a))) (pow (cos a) 3)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* b (- (* -1 (* b (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 4))) (/ (* r (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 4))))) (* -1 (/ (* r (sin a)) (pow (cos a) 3))))) (/ r (pow (cos a) 2)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (* b (+ (* -1 (/ (* r (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (pow (cos a) 3))) (+ (/ (* r (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 5)) (/ (* (sin a) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 4))) (/ (* r (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 4)))) (cos a)))))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 4))) (/ (* r (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 4))))) (* -1 (/ (* r (sin a)) (pow (cos a) 3))))) (/ r (pow (cos a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* -1 (* b (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (* -1 (pow (cos a) 2))) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (cos a))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (* -1/6 (cos a))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (+ (* -1/6 (cos a)) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (+ (* -1/6 (cos a)) (* b (- (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* b (- (+ (* -1/6 (/ (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))) (pow (cos a) 3))) (+ (* 1/120 (cos a)) (* 5/3 (cos a)))) (+ (* -3/2 (- (+ (* -2 (cos a)) (* -1/6 (cos a))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))) (+ (* 7/8 (cos a)) (+ (* 2 (/ (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (cos a))) (/ (pow (sin a) 4) (pow (cos a) 3)))))))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (pow (cos a) 4))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4)))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (+ (* -1/6 (pow (cos a) 4)) (* b (+ (* -2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* -1/6 (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (+ (* 1/120 (pow (cos a) 4)) (* 5/3 (pow (cos a) 4)))) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (pow (cos a) 4)))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow b 2) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (* -2 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* b (- (* b (- (* 5/3 (pow (cos a) 4)) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* 2 (* (cos a) (pow (sin a) 3)))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos a) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (/ (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 (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 (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 b))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ b (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* 1/3 (/ b a)))) (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* b (+ (* 2/3 b) (* 1/3 (/ 1 a)))))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ b a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* 1/3 (/ (pow b 2) a)) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (pow b 2) a)) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 17/315 (/ (pow b 2) a)) (* 2/15 (/ 1 a)))) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (* a (cos b)) #s(hole binary64 a))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* b (+ 1 (* 1/2 (pow a 2))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (* 2 (PI))) (cos (* 2 (PI))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))) (cos (* 2 (PI))))) (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (* 2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (pow (cos (* 2 (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (* 1/6 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))))) (* -1 (/ (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (cos (* 2 (PI)))))))) (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (* 2 (PI))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (+ b (* 2 (PI)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/3 (/ 1 (cos a))) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 7))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ b (cos a))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/3 (/ 1 (cos a))) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 7))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ b (pow (cos a) 2))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (/ 1 (pow (cos a) 2)) (/ (* b (sin a)) (pow (cos a) 3))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 5/6 (/ 1 (pow (cos a) 2))) (/ (pow (sin a) 2) (pow (cos a) 4))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 4))))) (* -1 (/ (sin a) (pow (cos a) 3))))) (/ 1 (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (+ (* 5/6 (/ 1 (pow (cos a) 2))) (/ (pow (sin a) 2) (pow (cos a) 4))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 4))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 3))) (/ (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 5)))))) (+ (* 5/6 (/ 1 (pow (cos a) 2))) (/ (pow (sin a) 2) (pow (cos a) 4)))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 4))))) (* -1 (/ (sin a) (pow (cos a) 3))))) (/ 1 (pow (cos a) 2))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos a) (* (pow b 2) (- (* -2 (cos a)) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2)))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (* b (- (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* b (- (* 5/3 (cos a)) (+ (* -3/2 (- (* -2 (cos a)) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))) (+ (* 7/8 (cos a)) (+ (* 2 (/ (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (cos a))) (/ (pow (sin a) 4) (pow (cos a) 3)))))))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2)))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (cos a)))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (cos a)))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (/ (cos a) b)))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (/ (+ (cos a) (* -1 (* b (sin a)))) b)))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (+ (* -1/2 a) (* 1/6 (* (pow a 2) b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (* -1/2 (* b b)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (* -1/6 (* b b)) #s(hole binary64 (* -1/6 (pow b 2))))
#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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (cos 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 (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* 1/120 (* b b)) #s(hole binary64 (* 1/120 (pow b 2))))
#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 (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2))))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (+ 1/24 (* -1/720 (pow b 2)))))
#s(approx (* -1/720 (* b b)) #s(hole binary64 (* -1/720 (pow b 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 (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (+ (* -1 (* a b)) (* -1/2 (pow a 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (pow b 3) #s(hole binary64 (pow b 3)))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (+ (* 1/4 (pow a 2)) (* a (* b (+ 1/6 (* -1/36 (pow a 2)))))) 1/2))))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (* 1/4 (pow a 2)) 1/2)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (+ (* 1/4 (pow a 2)) (* a (* b (+ 1/6 (* -1/36 (pow a 2)))))) 1/2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* 1/4 (* (pow a 2) b)) (* a (- (* 1/6 (pow a 2)) 1)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (+ (* 1/4 (pow a 2)) (* a (* b (+ 1/6 (* -1/36 (pow a 2))))))))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* -1/2 a) (* b (- (+ (* 1/6 (pow a 2)) (* 1/4 (* a b))) 1)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* -1/2 a) (* b (- (+ (* 1/6 (pow a 2)) (* b (+ (* 1/4 a) (* b (+ 1/6 (* -1/36 (pow a 2))))))) 1)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* b (+ (* 1/6 a) (* 1/4 b))) 1/2)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* b (+ (* 1/6 a) (* b (+ 1/4 (* -1/36 (* a b)))))) 1/2)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* b (+ (* 1/6 a) (* 1/4 b)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* b (+ (* 1/6 a) (* b (+ 1/4 (* -1/36 (* a b))))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* b (+ (* -1/36 (* a (pow b 2))) (* 1/6 a)))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* 1/6 b)))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* b (+ 1/6 (* -1/36 (pow b 2))))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 1/6))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 (+ 1/6 (* -1/36 (pow b 2)))))
#s(approx (* -1/36 (* b b)) #s(hole binary64 (* -1/36 (pow b 2))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 -1))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 (- (* 1/6 (pow b 2)) 1)))
#s(approx (* 1/6 (* b b)) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1/2 (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (/ (+ a b) b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (* -1 (exp (* (log b) 2))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (exp (* (log b) 2)) #s(hole binary64 (pow b 2)))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (log b))))
#s(approx (log b) #s(hole binary64 (log b)))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (* 1/2 (PI))) b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (+ b (* 1/2 (PI)))) b)))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (* -1 (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (/ (+ b (* -1 (* a (- (* -1/2 (/ (PI) a)) 1)))) b)))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b)))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (/ (+ (* -1 b) (* a (- (* -1/2 (/ (PI) a)) 1))) b)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ (- (* -1/2 (/ (PI) a)) 1) b)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ (- (+ (* -1 (/ b a)) (* -1/2 (/ (PI) a))) 1) b)))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (* -1/2 (/ (PI) (* a b)))))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (/ (+ (* -1 (/ b a)) (* -1/2 (/ (PI) a))) b)))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (* 1/2 (/ (PI) (* a b)))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (/ (+ (* 1/2 (/ (PI) a)) (/ b a)) b)))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 (/ (+ b (* 1/2 (PI))) b)))
#s(approx (* 1/2 (/ (PI) b)) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (/ (PI) b) #s(hole binary64 (/ (PI) b)))
#s(approx (pow b -1) #s(hole binary64 (/ 1 b)))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (* -1 (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* b r) (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (* b (+ (* 1/2 (/ (* b (* r (- (sin a) (sin (neg a))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (+ (* -1/4 (/ (* r (pow (- (sin a) (sin (neg a))) 2)) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (/ (* r (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (* -1/2 (/ (* r (- (sin a) (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/2 (/ (* r (- (* -1/6 (sin a)) (* -1/6 (sin (neg a))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/2 (/ (* (- (sin a) (sin (neg a))) (- (* -1/6 (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (+ (* -1/4 (/ (* r (pow (- (sin a) (sin (neg a))) 2)) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (/ (* r (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (* 1/2 (/ (* r (* (- (sin a) (sin (neg a))) (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))))))) (* -1/6 (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a))))))) (+ (* -1/4 (/ (* r (pow (- (sin a) (sin (neg a))) 2)) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (/ (* r (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (* -1/2 (/ (* r (- (sin a) (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ b (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (* b (+ (* 1/2 (/ (* b (- (sin a) (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/2 (/ (cos a) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/4 (/ (pow (- (sin a) (sin (neg a))) 2) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (* 1/6 (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))) (* -1/2 (/ (- (sin a) (sin (neg a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/2 (/ (* (- (sin a) (sin (neg a))) (- (* 1/2 (/ (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/2 (/ (cos a) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/4 (/ (pow (- (sin a) (sin (neg a))) 2) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (* 1/6 (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))) (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (+ (* -1/2 (/ (- (* -1/6 (sin a)) (* -1/6 (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (* 1/2 (/ (* (- (sin a) (sin (neg a))) (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))))))) (* 1/2 (/ (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2)))) (+ (* -1/2 (/ (cos a) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/4 (/ (pow (- (sin a) (sin (neg a))) 2) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (* 1/6 (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))) (* -1/2 (/ (- (sin a) (sin (neg a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (+ (cos a) (* -1/2 (* b (- (sin a) (sin (neg a)))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (+ (cos a) (* b (- (* b (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (* 1/2 (- (sin a) (sin (neg a))))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (+ (cos a) (* b (- (* b (- (+ (* -1/2 (cos a)) (* -1/2 (* b (- (* -1/6 (sin a)) (* -1/6 (sin (neg a))))))) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (* 1/2 (- (sin a) (sin (neg a))))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (neg a)) (cos a)))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (+ (* 1/2 (* b (- (sin a) (sin (neg a))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (+ (* 1/2 (- (cos (neg a)) (cos a))) (* b (+ (* 1/2 (* b (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))))) (* 1/2 (- (sin a) (sin (neg a)))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (+ (* 1/2 (- (cos (neg a)) (cos a))) (* b (+ (* 1/2 (- (sin a) (sin (neg a)))) (* b (+ (* 1/2 (* b (- (* -1/6 (sin a)) (* -1/6 (sin (neg a)))))) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (neg a)) (cos a))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (+ (cos (neg a)) (* b (- (sin a) (sin (neg a))))) (cos a))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (+ (cos (neg a)) (* b (- (+ (sin a) (* b (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))))) (sin (neg a))))) (cos a))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (+ (cos (neg a)) (* b (- (+ (sin a) (* b (- (+ (* -1/2 (cos (neg a))) (* b (- (* -1/6 (sin a)) (* -1/6 (sin (neg a)))))) (* -1/2 (cos a))))) (sin (neg a))))) (cos a))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (neg a))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos (neg a)) (* -1 (* b (sin (neg a)))))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos (neg a)) (* b (- (* -1/2 (* b (cos (neg a)))) (sin (neg a)))))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos (neg a)) (* b (- (* b (+ (* -1/2 (cos (neg a))) (* 1/6 (* b (sin (neg a)))))) (sin (neg a)))))))
#s(approx (- b a) #s(hole binary64 (- b a)))
#s(approx (cos (+ b a)) #s(hole binary64 (cos a)))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* b (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (* -1 (cos (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (+ (* -1 b) (* 1/2 (PI)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (* 1/24 (* b b)) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6)))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2))))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 1/120))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 (+ 1/120 (* -1/5040 (pow b 2)))))
#s(approx (* -1/5040 (* b b)) #s(hole binary64 (* -1/5040 (pow b 2))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (* (cos a) (cos 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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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 (* (sin a) (sin b)) 2) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (* (sin a) (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) (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) (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) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (+ (* -3 (pow (cos a) 10)) (+ (* -1/6 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))))))) (pow (cos a) 11)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 12))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (/ (* r (+ (* -2 (* (pow (cos a) 7) (pow (sin a) 3))) (* (pow (cos a) 7) (pow (sin a) 3)))) (pow (cos a) 11)) (+ (* -1 (/ (* (sin a) (- (/ (* r (+ (* -3 (pow (cos a) 10)) (+ (* -1/6 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))))))) (pow (cos a) 11)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 12))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 13)) (/ (* r (+ (* -1 (* (pow (cos a) 10) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 9/2 (* (pow (cos a) 10) (sin a))))) (pow (cos a) 12)))))) (/ (* r (+ (* -3 (pow (cos a) 10)) (+ (* -1/6 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))))))) (pow (cos a) 11))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 12))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 19/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/2 (/ 1 (cos a))) (* b (- (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 19/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* 9/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 13)))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 19/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos a)))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -9/2 (cos a)) (* -1 (cos a))) (+ (* -3 (cos a)) (* -2 (cos a))))))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -9/2 (cos a)) (+ (* -1 (cos a)) (* b (- (+ (* -1 (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* 9/2 (sin a))) (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -3 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))))) (pow (cos a) 10))) (/ (pow (sin a) 3) (pow (cos a) 2)))))))) (+ (* -3 (cos a)) (* -2 (cos a))))))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow b 2) (- (* -9/2 (pow (cos a) 3)) (* -3 (pow (cos a) 3)))) (pow (cos a) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -9/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3)))) (* -3 (pow (cos a) 3)))) (pow (cos a) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -9/2 (pow (cos a) 3)) (* b (- (* b (- (* 75/8 (pow (cos a) 3)) (+ (* -3 (- (* -9/2 (pow (cos a) 3)) (* -3 (pow (cos a) 3)))) (* 4 (pow (cos a) 3))))) (pow (sin a) 3)))) (* -3 (pow (cos a) 3)))) (pow (cos a) 3))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (pow (cos a) 9)))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* -9/2 (* (pow b 2) (pow (cos a) 9))) (pow (cos a) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* 75/8 (* (pow b 2) (pow (cos a) 9))))) (pow (cos a) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* (pow b 2) (+ (* -961/80 (* (pow b 2) (pow (cos a) 9))) (* 75/8 (pow (cos a) 9)))))) (pow (cos a) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (pow (cos a) 9)))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* -9/2 (* (pow b 2) (pow (cos a) 9))) (pow (cos a) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* 75/8 (* (pow b 2) (pow (cos a) 9))))) (pow (cos a) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* (pow b 2) (+ (* -961/80 (* (pow b 2) (pow (cos a) 9))) (* 75/8 (pow (cos a) 9)))))) (pow (cos a) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (pow (sin a) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (+ (* -3/2 (* (pow b 2) (pow (sin a) 9))) (pow (sin a) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (+ (* (pow b 2) (+ (* -3/2 (pow (sin a) 9)) (* 43/40 (* (pow b 2) (pow (sin a) 9))))) (pow (sin a) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (+ (* (pow b 2) (+ (* -3/2 (pow (sin a) 9)) (* (pow b 2) (+ (* -2473/5040 (* (pow b 2) (pow (sin a) 9))) (* 43/40 (pow (sin a) 9)))))) (pow (sin a) 9)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (pow (cos a) 6)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (* (pow (cos a) 3) (pow (sin a) 3))))) (pow (cos a) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (+ (* 4 (* b (pow (cos a) 6))) (* (pow (cos a) 3) (pow (sin a) 3)))))) (pow (cos a) 6))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* b (pow (sin a) 6)) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* b (+ (* b (* (pow (cos a) 3) (+ (* 13/120 (pow (sin a) 3)) (+ (* 3/4 (pow (sin a) 3)) (* 7/8 (pow (sin a) 3)))))) (pow (sin a) 6))) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* 13/120 (pow (sin a) 3)) (+ (* 3/4 (pow (sin a) 3)) (* 7/8 (pow (sin a) 3)))))) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* -7/16 (pow (sin a) 3)) (+ (* -61/240 (pow (sin a) 3)) (+ (* -13/80 (pow (sin a) 3)) (* -41/3024 (pow (sin a) 3))))))) (* (pow (cos a) 3) (+ (* 13/120 (pow (sin a) 3)) (+ (* 3/4 (pow (sin a) 3)) (* 7/8 (pow (sin a) 3))))))) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -2 (pow (cos a) 2)) (* b (- (* -2 (/ (pow (sin a) 3) (cos a))) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (* (sin a) (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (/ (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (cos a))))))) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (* -2 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* b (- (* b (- (* 5/3 (pow (cos a) 4)) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* 2 (* (cos a) (pow (sin a) 3)))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos a) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* b (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (* -1 (pow (cos a) 2))) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (+ 1 (* 1/6 (pow b 2)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) #s(hole binary64 b))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* b r) (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))) (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))) (+ (* -1 (/ (* r (pow (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) 2)) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))) (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (+ (/ (* r (- (* 1/6 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1/6 (sin a)))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)) (/ (* (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) (- (* -1/6 (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))) (+ (* -1 (/ (* r (pow (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) 2)) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a))))))))) (* -1/6 (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a))))))) (+ (* -1 (/ (* r (pow (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) 2)) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (+ (* b (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (+ (* b (- (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* b (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))))) (sin a))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (+ (* b (- (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* b (+ (* -1/2 (cos a)) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))) (* b (- (* 1/6 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1/6 (sin a)))))))) (sin a))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg a))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* -1 (* b (cos (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* -1/2 (* b (sin (neg a)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* b (+ (* -1/2 (sin (neg a))) (* 1/6 (* b (cos (neg a)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) a)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos a)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* (pow b 2) (+ r (/ r (* a b))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* b (+ (* a r) (/ r b)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 b))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (cos b) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (+ b (PI))) (cos (+ b (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) b)))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (+ b (* 2 (PI)))) (cos (+ b (* 2 (PI)))))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 b))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (* b (+ 1 (* 2 (/ (PI) b))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ (* (pow b 2) (sin a)) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 2) (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ (* b (sin a)) (pow (cos a) 2))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* b (+ a (/ 1 b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (* -1 (sin a))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* b (+ (* -1 a) (/ 1 b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* a (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* b (+ (* -1/2 (/ (pow a 2) b)) (+ (* a (- (* 1/6 (pow a 2)) 1)) (/ 1 b))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* a (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* b (+ (* -1/2 (/ (pow a 2) b)) (* a (- (* 1/6 (pow a 2)) 1))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* b (- (* 1/6 (pow a 2)) 1))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* b (- (+ (* -1/2 (/ a b)) (* 1/6 (pow a 2))) 1))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ a b)) (* 1/6 (pow a 2))))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* b (- (* 1/6 a) (* 1/2 (/ 1 b))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* (pow b 5) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (* (pow b 4) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* (pow b 2) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (+ (* 1/24 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* -1 (* a b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* b (+ (* -1 a) (+ (* -1/2 (/ (pow a 2) b)) (/ 1 b))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* b (+ (* -1 a) (* -1/2 (/ (pow a 2) b))))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* b (- (* -1/2 (/ a b)) 1))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (cos a) b)) (+ (* 1/6 (sin a)) (/ (cos a) (pow b 3)))) (/ (sin a) (pow b 2))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* a (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (* a (+ 1/6 (* -1/36 (pow a 2))))) (* 1/2 (/ 1 b))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))) (* 1/2 (/ 1 b))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (pow a 2) (pow b 3))) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (+ (/ 1 (pow b 3)) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))))) (* 1/2 (/ 1 b))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* a (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (* a (+ 1/6 (* -1/36 (pow a 2))))) (* 1/2 (/ 1 b))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))) (* 1/2 (/ 1 b))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (pow a 2) (pow b 3))) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2))))) (* 1/2 (/ 1 b))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow b 3) (+ (* 1/4 (/ (pow a 2) b)) (* a (+ 1/6 (* -1/36 (pow a 2))))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow b 3) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (pow a 2) (pow b 3))) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2))))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (+ 1/6 (+ (* -1/36 (pow a 2)) (* 1/4 (/ a b)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (- (+ 1/6 (+ (* -1/36 (pow a 2)) (+ (* 1/6 (/ (pow a 2) (pow b 2))) (* 1/4 (/ a b))))) (/ 1 (pow b 2))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (- (+ 1/6 (+ (* -1/2 (/ a (pow b 3))) (+ (* -1/36 (pow a 2)) (+ (* 1/6 (/ (pow a 2) (pow b 2))) (* 1/4 (/ a b)))))) (/ 1 (pow b 2))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1/36 (* a (pow b 3)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (* 1/4 (/ 1 b))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (+ (* 1/6 (/ a (pow b 2))) (* 1/4 (/ 1 b)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* (pow b 3) (- (+ (* -1/36 a) (+ (* 1/6 (/ a (pow b 2))) (* 1/4 (/ 1 b)))) (* 1/2 (/ 1 (pow b 3)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1/36 (* a (pow b 3)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (* 1/4 (/ 1 b))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (+ (* 1/6 (/ a (pow b 2))) (* 1/4 (/ 1 b)))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* -1/36 (* a (pow b 3)))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (* 1/6 (/ a (pow b 2)))))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* -1/36 (pow b 3))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* (pow b 3) (- (* 1/6 (/ 1 (pow b 2))) 1/36))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 (* -1/36 (pow b 2))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/6 (/ 1 (pow b 2))) 1/36))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* 1/6 (pow b 3))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* (pow b 3) (- 1/6 (/ 1 (pow b 2))))))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 (* (pow b 2) (- 1/6 (/ 1 (pow b 2))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* 1/6 (* b (sin a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (* (log b) 2) #s(hole binary64 (* -2 (log (/ 1 b)))))
#s(approx (log b) #s(hole binary64 (* -1 (log (/ 1 b)))))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 1))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 1))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (* -1 (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 -1))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (- (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b) 1)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ -1 a)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (- (* -1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (/ -1 a)))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (- (* -1/2 (/ (PI) (* a b))) (/ 1 a))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (+ (* 1/2 (/ (PI) (* a b))) (/ 1 a))))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* -1 (/ (pow a 2) (pow b 2))) (+ (* 1/2 (/ (PI) b)) (+ (/ a b) (/ (pow a 2) (pow b 2)))))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (- b a) #s(hole binary64 (* b (+ 1 (* -1 (/ a b))))))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) 1))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- (+ 1/24 (/ 1 (pow b 4))) (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* (pow b 2) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1/5040 (pow b 7))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* (pow b 7) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* (pow b 7) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* (pow b 7) (- (+ (* 1/120 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* -1/5040 (pow b 6))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* (pow b 6) (- (+ (* 1/120 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* -1/5040 (pow b 6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (* -1/5040 (pow b 4))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (* (pow b 4) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (* (pow b 4) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* -1/5040 (pow b 4))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* (pow b 4) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 (* -1/5040 (pow b 2))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* 1/6 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* b (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* (pow b 2) (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (sin b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 (sin b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* b (+ (* -1 (* a r)) (* -1 (/ r b)))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* -1 (* b (- (* -1/2 (pow a 2)) 1)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (- (PI) (* -1 b))) (cos (- (PI) (* -1 b))))))
#s(approx (+ b (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (- (* 2 (PI)) (* -1 b))) (cos (- (* 2 (PI)) (* -1 b))))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (* -1 (* b (- (* -2 (/ (PI) b)) 1)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* b (- (* -1 a) (/ 1 b))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* -1 (* b (- a (/ 1 b))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* a (* b (+ 1 (* -1/6 (pow a 2))))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ (+ 1 (* -1/2 (pow a 2))) b)) (* a (+ 1 (* -1/6 (pow a 2)))))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* a (* b (+ 1 (* -1/6 (pow a 2))))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (pow a 2) b)) (* a (+ 1 (* -1/6 (pow a 2)))))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1 (* b (+ 1 (* -1/6 (pow a 2)))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -1/6 (pow a 2)) (* 1/2 (/ a b))))))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/6 (pow a 2)) (* 1/2 (/ a b)))))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/6 a) (* 1/2 (/ 1 b)))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) (+ 1/120 (/ 1 (pow b 4))))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* -1 (* b (+ a (* -1 (/ (+ 1 (* -1/2 (pow a 2))) b)))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* -1 (* b (+ a (* 1/2 (/ (pow a 2) b)))))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1 (* b (+ 1 (* 1/2 (/ a b)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* a (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (* 1/4 (pow a 2)) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* a (+ 1 (* -1/6 (pow a 2)))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* -1/2 (pow a 2))) b)) (* a (+ 1 (* -1/6 (pow a 2))))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* a (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (* 1/4 (pow a 2)) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* a (+ 1 (* -1/6 (pow a 2)))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (/ (pow a 2) b)) (* a (+ 1 (* -1/6 (pow a 2))))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* a (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/4 (/ (pow a 2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (* a (+ 1 (* -1/6 (pow a 2)))) b)) (* 1/4 (pow a 2))) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (pow a 2) b)) (* a (+ 1 (* -1/6 (pow a 2))))) b)) (* 1/4 (pow a 2))) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1/4 (/ a b)) (* 1/36 (pow a 2))) 1/6)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* -1/6 (pow a 2))) b)) (* 1/4 a)) b)) (* 1/36 (pow a 2))) 1/6)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1/6 (pow a 2)) (* 1/2 (/ a b)))) b)) (* 1/4 a)) b)) (* 1/36 (pow a 2))) 1/6)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* (pow b 3) (- (* 1/36 a) (* 1/4 (/ 1 b)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ 1/4 (* 1/6 (/ a b))) b)) (* 1/36 a))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ 1/4 (* -1 (/ (+ (* -1/6 a) (* 1/2 (/ 1 b))) b))) b)) (* 1/36 a))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1 (* (pow b 3) (- (* 1/36 a) (* 1/4 (/ 1 b)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ 1/4 (* 1/6 (/ a b))) b)) (* 1/36 a))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (/ a (pow b 2))) (* 1/36 a))))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* -1 (* (pow b 3) (- 1/36 (* 1/6 (/ 1 (pow b 2))))))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* -1 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (* 1/2 (cos a)) (/ (sin a) b)) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 b)))))))
#s(approx (log b) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 b))))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ a b)) (* -1/2 (/ (PI) b))) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 a) (* -1/2 (PI))) b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (/ (* a (+ 1 (* 1/2 (/ (PI) a)))) b))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (- (* -1 (/ (* a (+ 1 (* 1/2 (/ (PI) a)))) b)) 1)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) a))) b)) (/ 1 a))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (+ a (* -1 b)))) (/ (pow b 2) (+ a (* -1 b))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (+ a (* -1 b)))) (/ (pow b 2) (+ a (* -1 b))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (+ a (* -1 b)))) (/ (pow b 2) (+ a (* -1 b)))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (+ (* -1 (/ (+ (* -1 (pow a 2)) (pow a 2)) b)) (* 1/2 (PI)))) b)) 1)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (* (cos a) (cos b)) (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b)))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b))))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (neg (+ a (* -1 b))))))
#s(approx (- b a) #s(hole binary64 (* -1 (* b (- (/ a b) 1)))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 b) (* 1/2 (PI))))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1/2 (/ (PI) b)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1 (* (pow b 7) (- 1/5040 (* 1/120 (/ 1 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1 (* (pow b 7) (- (+ 1/5040 (/ 1/6 (pow b 4))) (* 1/120 (/ 1 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1 (* (pow b 7) (- (+ 1/5040 (/ 1/6 (pow b 4))) (+ (* 1/120 (/ 1 (pow b 2))) (/ 1 (pow b 6))))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos (- a (* -1 b))) (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos (- a (* -1 b))) (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 b) a))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos (- a (* -1 b)))))
Calls

9 calls:

TimeVariablePointExpression
157.0ms
a
@inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (* (* b b) r)) a (* (* b b) r) (* b b) b r (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (+ (* (* b b) r) (/ (* b r) a))) (+ (* (* b b) r) (/ (* b r) a)) (/ (* b r) a) (* b r) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* (* b b) (+ (* a r) (/ r b))) (+ (* a r) (/ r b)) (/ r b) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* -1/720 (pow a 6)) -1/720 (pow a 6) 6 (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) (* -1/720 (* a a)) 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (* b (pow (cos a) 2)) (pow (cos a) 2) 2 (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (sin b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 1/2 (PI)))) (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow (cos b) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow (* (cos a) (cos b)) 4) 4 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ b a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (PI) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ 1 (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) 1/24 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (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))) (+ (* (* (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))))))) (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) -1 (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+ (* -1 (sin a)) (/ (cos a) b)) (/ (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* -1 (* a b))) (* -1 (* a b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (* a (- (* 1/6 (* a b)) 1/2)) (- (* 1/6 (* a b)) 1/2) (* 1/6 (* a b)) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* b (+ 1 (* -1/6 (* b b)))) (+ 1 (* -1/6 (* b b))) (* -1/6 (* b b)) -1/6 (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (* (* b b) (- (* 1/120 (* b b)) 1/6)) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (* a (+ (* -1 b) (* -1/2 a))) (+ (* -1 b) (* -1/2 a)) (* -1/2 a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* 1/6 (* (pow b 3) (sin a))) (* (pow b 3) (sin a)) (pow 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))) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/4 (* a (* b (+ 1/6 (* -1/36 (* b b))))) (* b (+ 1/6 (* -1/36 (* b b)))) (+ 1/6 (* -1/36 (* b b))) (* -1/36 (* b b)) -1/36 (* b (- (* 1/6 (* b b)) 1)) (- (* 1/6 (* b b)) 1) (* 1/6 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (/ (+ 1 (/ a b)) a) (+ 1 (/ a b)) (/ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (- a b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ (+ 1 (* 1/2 (/ (PI) b))) a) (+ 1 (* 1/2 (/ (PI) b))) (* 1/2 (/ (PI) b)) (/ (PI) b) (pow b -1) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (* -1 (* b b)) (/ (PI) 2) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2) (- (cos (- b a)) (cos (+ b a))) (cos (- b a)) (- b a) (cos (+ b a)) (+ b a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ b (/ (PI) 2))) (+ b (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg a) (/ (PI) 2))) (+ (neg a) (/ (PI) 2)) (neg a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg b) (/ (PI) 2))) (+ (neg b) (/ (PI) 2)) (neg b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)) (sin b) (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (+ 1/120 (* -1/5040 (* b b))) (* -1/5040 (* b b)) -1/5040 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (cos (+ a b)) (+ a b) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (cos (+ a b)) (+ a b) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (sin (neg (+ a b))) (neg (+ a b)) (+ a b) (cos (/ (PI) 2)) (* (cos (+ a b)) 1) (cos (+ a b)))
127.0ms
b
@0
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (* (* b b) r)) a (* (* b b) r) (* b b) b r (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (+ (* (* b b) r) (/ (* b r) a))) (+ (* (* b b) r) (/ (* b r) a)) (/ (* b r) a) (* b r) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* (* b b) (+ (* a r) (/ r b))) (+ (* a r) (/ r b)) (/ r b) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* -1/720 (pow a 6)) -1/720 (pow a 6) 6 (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) (* -1/720 (* a a)) 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (* b (pow (cos a) 2)) (pow (cos a) 2) 2 (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (sin b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 1/2 (PI)))) (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow (cos b) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow (* (cos a) (cos b)) 4) 4 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ b a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (PI) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ 1 (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) 1/24 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (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))) (+ (* (* (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))))))) (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) -1 (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+ (* -1 (sin a)) (/ (cos a) b)) (/ (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* -1 (* a b))) (* -1 (* a b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (* a (- (* 1/6 (* a b)) 1/2)) (- (* 1/6 (* a b)) 1/2) (* 1/6 (* a b)) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* b (+ 1 (* -1/6 (* b b)))) (+ 1 (* -1/6 (* b b))) (* -1/6 (* b b)) -1/6 (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (* (* b b) (- (* 1/120 (* b b)) 1/6)) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (* a (+ (* -1 b) (* -1/2 a))) (+ (* -1 b) (* -1/2 a)) (* -1/2 a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* 1/6 (* (pow b 3) (sin a))) (* (pow b 3) (sin a)) (pow 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))) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/4 (* a (* b (+ 1/6 (* -1/36 (* b b))))) (* b (+ 1/6 (* -1/36 (* b b)))) (+ 1/6 (* -1/36 (* b b))) (* -1/36 (* b b)) -1/36 (* b (- (* 1/6 (* b b)) 1)) (- (* 1/6 (* b b)) 1) (* 1/6 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (/ (+ 1 (/ a b)) a) (+ 1 (/ a b)) (/ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (- a b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ (+ 1 (* 1/2 (/ (PI) b))) a) (+ 1 (* 1/2 (/ (PI) b))) (* 1/2 (/ (PI) b)) (/ (PI) b) (pow b -1) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (* -1 (* b b)) (/ (PI) 2) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2) (- (cos (- b a)) (cos (+ b a))) (cos (- b a)) (- b a) (cos (+ b a)) (+ b a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ b (/ (PI) 2))) (+ b (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg a) (/ (PI) 2))) (+ (neg a) (/ (PI) 2)) (neg a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg b) (/ (PI) 2))) (+ (neg b) (/ (PI) 2)) (neg b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)) (sin b) (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (+ 1/120 (* -1/5040 (* b b))) (* -1/5040 (* b b)) -1/5040 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (cos (+ a b)) (+ a b) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (cos (+ a b)) (+ a b) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (sin (neg (+ a b))) (neg (+ a b)) (+ a b) (cos (/ (PI) 2)) (* (cos (+ a b)) 1) (cos (+ a b)))
124.0ms
a
@-inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (* (* b b) r)) a (* (* b b) r) (* b b) b r (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (+ (* (* b b) r) (/ (* b r) a))) (+ (* (* b b) r) (/ (* b r) a)) (/ (* b r) a) (* b r) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* (* b b) (+ (* a r) (/ r b))) (+ (* a r) (/ r b)) (/ r b) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* -1/720 (pow a 6)) -1/720 (pow a 6) 6 (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) (* -1/720 (* a a)) 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (* b (pow (cos a) 2)) (pow (cos a) 2) 2 (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (sin b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 1/2 (PI)))) (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow (cos b) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow (* (cos a) (cos b)) 4) 4 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ b a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (PI) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ 1 (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) 1/24 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (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))) (+ (* (* (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))))))) (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) -1 (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+ (* -1 (sin a)) (/ (cos a) b)) (/ (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* -1 (* a b))) (* -1 (* a b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (* a (- (* 1/6 (* a b)) 1/2)) (- (* 1/6 (* a b)) 1/2) (* 1/6 (* a b)) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* b (+ 1 (* -1/6 (* b b)))) (+ 1 (* -1/6 (* b b))) (* -1/6 (* b b)) -1/6 (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (* (* b b) (- (* 1/120 (* b b)) 1/6)) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (* a (+ (* -1 b) (* -1/2 a))) (+ (* -1 b) (* -1/2 a)) (* -1/2 a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* 1/6 (* (pow b 3) (sin a))) (* (pow b 3) (sin a)) (pow 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))) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/4 (* a (* b (+ 1/6 (* -1/36 (* b b))))) (* b (+ 1/6 (* -1/36 (* b b)))) (+ 1/6 (* -1/36 (* b b))) (* -1/36 (* b b)) -1/36 (* b (- (* 1/6 (* b b)) 1)) (- (* 1/6 (* b b)) 1) (* 1/6 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (/ (+ 1 (/ a b)) a) (+ 1 (/ a b)) (/ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (- a b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ (+ 1 (* 1/2 (/ (PI) b))) a) (+ 1 (* 1/2 (/ (PI) b))) (* 1/2 (/ (PI) b)) (/ (PI) b) (pow b -1) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (* -1 (* b b)) (/ (PI) 2) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2) (- (cos (- b a)) (cos (+ b a))) (cos (- b a)) (- b a) (cos (+ b a)) (+ b a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ b (/ (PI) 2))) (+ b (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg a) (/ (PI) 2))) (+ (neg a) (/ (PI) 2)) (neg a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg b) (/ (PI) 2))) (+ (neg b) (/ (PI) 2)) (neg b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)) (sin b) (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (+ 1/120 (* -1/5040 (* b b))) (* -1/5040 (* b b)) -1/5040 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (cos (+ a b)) (+ a b) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (cos (+ a b)) (+ a b) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (sin (neg (+ a b))) (neg (+ a b)) (+ a b) (cos (/ (PI) 2)) (* (cos (+ a b)) 1) (cos (+ a b)))
91.0ms
b
@-inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (* (* b b) r)) a (* (* b b) r) (* b b) b r (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (+ (* (* b b) r) (/ (* b r) a))) (+ (* (* b b) r) (/ (* b r) a)) (/ (* b r) a) (* b r) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* (* b b) (+ (* a r) (/ r b))) (+ (* a r) (/ r b)) (/ r b) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* -1/720 (pow a 6)) -1/720 (pow a 6) 6 (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) (* -1/720 (* a a)) 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (* b (pow (cos a) 2)) (pow (cos a) 2) 2 (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (sin b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 1/2 (PI)))) (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow (cos b) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow (* (cos a) (cos b)) 4) 4 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ b a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (PI) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ 1 (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) 1/24 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (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))) (+ (* (* (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))))))) (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) -1 (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+ (* -1 (sin a)) (/ (cos a) b)) (/ (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* -1 (* a b))) (* -1 (* a b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (* a (- (* 1/6 (* a b)) 1/2)) (- (* 1/6 (* a b)) 1/2) (* 1/6 (* a b)) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* b (+ 1 (* -1/6 (* b b)))) (+ 1 (* -1/6 (* b b))) (* -1/6 (* b b)) -1/6 (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (* (* b b) (- (* 1/120 (* b b)) 1/6)) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (* a (+ (* -1 b) (* -1/2 a))) (+ (* -1 b) (* -1/2 a)) (* -1/2 a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* 1/6 (* (pow b 3) (sin a))) (* (pow b 3) (sin a)) (pow 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))) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/4 (* a (* b (+ 1/6 (* -1/36 (* b b))))) (* b (+ 1/6 (* -1/36 (* b b)))) (+ 1/6 (* -1/36 (* b b))) (* -1/36 (* b b)) -1/36 (* b (- (* 1/6 (* b b)) 1)) (- (* 1/6 (* b b)) 1) (* 1/6 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (/ (+ 1 (/ a b)) a) (+ 1 (/ a b)) (/ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (- a b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ (+ 1 (* 1/2 (/ (PI) b))) a) (+ 1 (* 1/2 (/ (PI) b))) (* 1/2 (/ (PI) b)) (/ (PI) b) (pow b -1) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (* -1 (* b b)) (/ (PI) 2) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2) (- (cos (- b a)) (cos (+ b a))) (cos (- b a)) (- b a) (cos (+ b a)) (+ b a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ b (/ (PI) 2))) (+ b (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg a) (/ (PI) 2))) (+ (neg a) (/ (PI) 2)) (neg a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg b) (/ (PI) 2))) (+ (neg b) (/ (PI) 2)) (neg b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)) (sin b) (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (+ 1/120 (* -1/5040 (* b b))) (* -1/5040 (* b b)) -1/5040 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (cos (+ a b)) (+ a b) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (cos (+ a b)) (+ a b) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (sin (neg (+ a b))) (neg (+ a b)) (+ a b) (cos (/ (PI) 2)) (* (cos (+ a b)) 1) (cos (+ a b)))
88.0ms
b
@inf
((* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (* (* b b) r)) a (* (* b b) r) (* b b) b r (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* a (+ (* (* b b) r) (/ (* b r) a))) (+ (* (* b b) r) (/ (* b r) a)) (/ (* b r) a) (* b r) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* a (* (* b b) r)) (* b r)) (* (* b b) (+ (* a r) (/ r b))) (+ (* a r) (/ r b)) (/ r b) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* -1/2 (* a a))) (* -1/2 (* a a)) -1/2 (* a a) (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (* -1/720 (pow a 6)) -1/720 (pow a 6) 6 (* r (/ (sin b) (cos (+ a b)))) (* b (/ r (cos a))) (/ r (cos a)) (cos a) (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (+ 1/24 (* -1/720 (* a a))) (* -1/720 (* a a)) 1/2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+ r (* a (* b r))) (* a (* b r)) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/ r (* b (cos a))) (* b (cos a)) (cos a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (* b (pow (cos a) 2)) (pow (cos a) 2) 2 (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow (* (cos a) (cos b)) 3) (* (cos a) (cos b)) (cos b) 3 (pow (* (sin a) (sin b)) 3) (* (sin a) (sin b)) (sin a) (sin b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))) (+ a (+ b (* 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)) (sin (+ b (* 1/2 (PI))))) (sin (+ b (* 1/2 (PI)))) (+ b (* 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow (cos b) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (* (cos b) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow (* (cos a) (cos b)) 2) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (* (pow (cos a) 3) (pow (cos b) 3)) (pow (cos a) 3) (pow (cos b) 3) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow (* (cos a) (cos b)) 4) 4 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ b a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (+ (* a (pow (tan b) 2)) (tan b)) (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (sin b) (* a (cos b))) (* a (cos b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (+ b (* 1/2 (* (* a a) b))) (* 1/2 (* (* a a) b)) (* (* a a) b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ b (PI))) (+ b (PI)) (PI) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+ 1 (* a b)) (* a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/ 1 (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (/ b (cos a)) (cos a) (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (* (* a a) (- (* 1/24 (* a a)) 1/2)) (- (* 1/24 (* a a)) 1/2) (* 1/24 (* a a)) 1/24 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (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))) (+ (* (* (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))))))) (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* -1 (* b (sin a))) -1 (* b (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+ (* -1 (sin a)) (/ (cos a) b)) (/ (cos a) b) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* -1 (* a b))) (* -1 (* a b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (* a (- (* 1/6 (* a b)) 1/2)) (- (* 1/6 (* a b)) 1/2) (* 1/6 (* a b)) 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)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+ 1 (* -1/2 (* b b))) (* -1/2 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (* b (- (* -1/2 (* b (cos a))) (sin a))) (- (* -1/2 (* b (cos a))) (sin a)) (* -1/2 (* b (cos a))) (* b (cos a)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (sin b) (* b (+ 1 (* -1/6 (* b b)))) (+ 1 (* -1/6 (* b b))) (* -1/6 (* b b)) -1/6 (cos (+ a b)) (+ (* (neg b) (sin a)) (cos a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (* (* b b) (- (* 1/120 (* b b)) 1/6)) (- (* 1/120 (* b b)) 1/6) (* 1/120 (* b b)) 1/120 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (+ 1/24 (* -1/720 (* b b))) (* -1/720 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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 b) -1/6) 1) b) (+ (* (* b b) -1/6) 1) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* -1 (* b (sin a)))) (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (* a (+ (* -1 b) (* -1/2 a))) (+ (* -1 b) (* -1/2 a)) (* -1/2 a) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* 1/6 (* (pow b 3) (sin a))) (* (pow b 3) (sin a)) (pow 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))) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/4 (* a (* b (+ 1/6 (* -1/36 (* b b))))) (* b (+ 1/6 (* -1/36 (* b b)))) (+ 1/6 (* -1/36 (* b b))) (* -1/36 (* b b)) -1/36 (* b (- (* 1/6 (* b b)) 1)) (- (* 1/6 (* b b)) 1) (* 1/6 (* b b)) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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)))))) (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (sin a) (sin b)) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (/ (+ 1 (/ a b)) a) (+ 1 (/ a b)) (/ a b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (* b (+ (pow a -1) (pow b -1))) (+ (pow a -1) (pow b -1)) (pow a -1) (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (cos (/ (- (* a a) (* b b)) (- a b))) (/ (- (* a a) (* b b)) (- a b)) (- (* a a) (* b b)) (* -1 (exp (* (log b) 2))) (exp (* (log b) 2)) (* (log b) 2) (log b) (- a b) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ (+ 1 (* 1/2 (/ (PI) b))) a) (+ 1 (* 1/2 (/ (PI) b))) (* 1/2 (/ (PI) b)) (/ (PI) b) (pow b -1) (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (- (* a a) (exp (* (log b) 2))) (* -1 (* b b)) (/ (PI) 2) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2) (- (cos (- b a)) (cos (+ b a))) (cos (- b a)) (- b a) (cos (+ b a)) (+ b a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ b (/ (PI) 2))) (+ b (/ (PI) 2)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg a) (/ (PI) 2))) (+ (neg a) (/ (PI) 2)) (neg a) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (sin (+ (neg b) (/ (PI) 2))) (+ (neg b) (/ (PI) 2)) (neg b) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (* (* b b) (- (* 1/24 (* b b)) 1/2)) (- (* 1/24 (* b b)) 1/2) (* 1/24 (* b b)) (* (sin b) (sin a)) (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (sin b) (sin a)) (sin b) (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (+ 1/120 (* -1/5040 (* b b))) (* -1/5040 (* b b)) -1/5040 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (* (cos a) (cos b)) (* (sin a) (sin b))) (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) (/ (+ 1 (* 1/6 (* b b))) b) (+ 1 (* 1/6 (* b b))) (cos (+ a b)) (+ a b) (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/ 1 (/ 1 (sin b))) (/ 1 (sin b)) (cos (+ a b)) (+ a b) (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (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) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+ (cos a) (* -1 (* b (sin a)))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (- (* (cos a) (cos b)) (* (sin a) (sin b))) (* (cos a) (cos b)) (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (sin (neg (+ a b))) (neg (+ a b)) (+ a b) (cos (/ (PI) 2)) (* (cos (+ a b)) 1) (cos (+ a b)))

rewrite1.4s (10.8%)

Memory
-98.7MiB live, 1 214.9MiB allocated; 1.1s collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07444111625
08192111625
08192108844
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
2 691 → 2 708
Calls
Call 1
Inputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))
(*.f64 a (*.f64 (*.f64 b b) r))
a
(*.f64 (*.f64 b b) r)
(*.f64 b b)
b
r
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))
(*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))
(fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))
(/.f64 (*.f64 b r) a)
(*.f64 b r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))
(*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b)))
(fma.f64 a r (/.f64 r b))
(/.f64 r b)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
#s(literal -1/2 binary64)
(*.f64 a a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))))))
(/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))
#s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
(*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))
#s(literal -1/720 binary64)
(pow.f64 a #s(literal 6 binary64))
#s(literal 6 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
(*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))))
(/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 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) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
(*.f64 #s(literal -1/720 binary64) (*.f64 a a))
#s(literal 1/2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r))))
#s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))
(*.f64 a (*.f64 b r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))))
(*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))))
(*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))
(/.f64 r (*.f64 b (cos.f64 a)))
(*.f64 b (cos.f64 a))
(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 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 b)
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
(sin.f64 b)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a)))
(*.f64 r (sin.f64 b))
(sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))
#s(approx (+ a (+ b (* 1/2 (PI)))) 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)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b)))
(sin.f64 #s(approx (+ b (* 1/2 (PI))) b))
#s(approx (+ b (* 1/2 (PI))) 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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.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 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64)))
#s(approx (tan b) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))
(*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))
(/.f64 b a)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))
(*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
(/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))
(*.f64 a (cos.f64 b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))
(*.f64 (*.f64 a a) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64))))
(tan.f64 #s(approx (+ b (PI)) (PI.f64)))
#s(approx (+ b (PI)) (PI.f64))
(PI.f64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(+.f64 (+.f64 b (PI.f64)) (PI.f64))
(+.f64 b (PI.f64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b)))
#s(approx (+ 1 (* a b)) (*.f64 a b))
(*.f64 a b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))))))
(/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))
(*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))
(*.f64 #s(literal 1/24 binary64) (*.f64 a a))
#s(literal 1/24 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.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 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))
#s(literal -1 binary64)
(*.f64 b (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
(*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))
(fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))
(/.f64 (cos.f64 a) b)
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
(*.f64 #s(literal -1 binary64) (*.f64 a b))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/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)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))
(*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))
(*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/6 binary64) (*.f64 a b))
#s(literal 1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/2 binary64) (*.f64 b b))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))
(-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))
(*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b))
#s(approx (* b (cos a)) b)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/6 binary64) (*.f64 b b))
#s(literal -1/6 binary64)
#s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#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))))))
(*.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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)))
(-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))
(*.f64 #s(literal 1/120 binary64) (*.f64 b b))
#s(literal 1/120 binary64)
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/720 binary64) (*.f64 b b))
(*.f64 (sin.f64 b) (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
#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(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
(+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))
(*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))
(fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) a)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (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)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
(*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))
(*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))
(pow.f64 b #s(literal 3 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b 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(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #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)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))
(*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))
(fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))))
#s(literal 1/4 binary64)
(*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/36 binary64) (*.f64 b b))
#s(literal -1/36 binary64)
(*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))
(*.f64 #s(literal 1/6 binary64) (*.f64 b b))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))
(-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a))
(*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))
(*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)
#s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))))
(*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(/.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)
#s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))))
(*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))
#s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))
(pow.f64 a #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b))))
(cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))
(/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 (log.f64 b) #s(literal 2 binary64))
(log.f64 b)
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))))
(*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))
(*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))
(*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))
(-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))
(/.f64 (PI.f64) b)
(pow.f64 b #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))))
(*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64)))
#s(approx (cos b) #s(literal 1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a)))
(cos.f64 (-.f64 b a))
(-.f64 b a)
(cos.f64 (+.f64 b a))
(+.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 a)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a))))
(-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))
(*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 b b))
(*.f64 #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)))))) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))
(*.f64 #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)))))) (sin.f64 a))
#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))))))
(*.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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/5040 binary64) (*.f64 b b))
#s(literal -1/5040 binary64)
(*.f64 r (/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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))))))
(/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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)))))
(/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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 (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (+ (* (* (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)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))
(pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))
(fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 #s(approx (* (sin b) r) (*.f64 b r)) #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 (* (sin b) r) (*.f64 b r))
#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)))))
(+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(/.f64 (*.f64 #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)))))) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 #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)))))) r)
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 b) r)
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(sin.f64 (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
(+.f64 a b)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))
(cos.f64 (+.f64 a b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* r (+ b (* a (pow b 2))))))
#s(approx (* a (* (* b b) r)) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* (* b b) r) #s(hole binary64 (* (pow b 2) r)))
#s(approx r #s(hole binary64 r))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* a (* r (+ (/ b a) (pow b 2))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* r (+ (/ b a) (pow b 2)))))
#s(approx (/ (* b r) a) #s(hole binary64 (/ (* b r) a)))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* (pow b 2) (* r (+ a (/ 1 b))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* r (+ a (/ 1 b)))))
#s(approx (/ r b) #s(hole binary64 (/ r b)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* r (+ 1 (* a b)))))
#s(approx (* a (* b r)) #s(hole binary64 (* a (* b r))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r (* b (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 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* r (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ r (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (- a b))) (/ (pow b 2) (- a b)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* 1/2 (- (cos (- b a)) (cos (+ a b))))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (* (sin b) (* (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (* (sin b) r) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos (+ a b)) (* (cos (* 1/2 (PI))) (sin (neg (+ a b))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a))))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* r (+ (* -1 b) (* -1 (* a (pow b 2))))))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* -1 (* a (* r (+ (* -1 (/ b a)) (* -1 (pow b 2))))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* -1 (* r (+ (* -1 (/ b a)) (* -1 (pow b 2)))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* -1 (* (pow b 2) (* r (- (* -1 a) (/ 1 b)))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* -1 (* r (- (* -1 a) (/ 1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (pow (cos a) 2))) (/ 1 (cos a)))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* r (- (* -1 (* a b)) 1)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a)))))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (- (* -1/6 (* b r)) (* -1 (* b r))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx a #s(hole binary64 a))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* b r)))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (/ (* b r) a)))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (/ (+ (* a (* (pow b 2) r)) (* b r)) a)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* b r)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (/ r b)))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (* b r)))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* b r))) (* b r))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (* b (/ r (cos a))) #s(hole binary64 (+ (* b r) (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (* b r)) (+ (* 1/48 (* b r)) (* 1/2 (+ (* -1/4 (* b r)) (* 1/24 (* b r)))))))) (+ (* -1/4 (* b r)) (* 1/24 (* b r))))) (* -1/2 (* b r)))))))
#s(approx (/ r (cos a)) #s(hole binary64 r))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* 1/2 (* (pow a 2) r)))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (/ r (cos a)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 r) (+ (* 1/48 r) (* 1/2 (+ (* -1/4 r) (* 1/24 r))))))) (+ (* -1/4 r) (* 1/24 r)))) (* -1/2 r))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (* -1/2 (* a a)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (* -1/720 (pow a 6)) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (pow a 6) #s(hole binary64 (pow a 6)))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2))))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (+ 1/24 (* -1/720 (pow a 2)))))
#s(approx (* -1/720 (* a a)) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* a (- (* a (- (* -1/6 (* b r)) (* -1 (* b r)))) (* -1/2 r))) (* b r))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 r))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 r))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ r (* a (+ (* a (+ (* 1/2 r) (* a (* b (- (* -1/6 r) (* -1 r)))))) (* b r))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* 1/2 (/ (* a r) b)))) (/ r b))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (* a (+ r (* a (- (* a (- (* -1/6 r) (* -1 r))) (* -1/2 (/ r b)))))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (/ r b)))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) r) b)) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (/ r (* b (cos a))) #s(hole binary64 (+ (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 (/ r b)) (+ (* 1/48 (/ r b)) (* 1/2 (+ (* -1/4 (/ r b)) (* 1/24 (/ r b)))))))) (+ (* -1/4 (/ r b)) (* 1/24 (/ r b))))) (* -1/2 (/ r b)))) (/ r b))))
#s(approx (* b (cos a)) #s(hole binary64 b))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* -1/2 (* (pow a 2) b)))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* 1/24 (* (pow a 2) b)))))))
#s(approx (* b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1/2 b) (* (pow a 2) (+ (* -1/720 (* (pow a 2) b)) (* 1/24 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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 b))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (+ b (* -1 (* (pow a 2) b)))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1 b) (* 1/3 (* (pow a 2) b)))))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (+ b (* (pow a 2) (+ (* -1 b) (* (pow a 2) (+ (* -2/45 (* (pow a 2) b)) (* 1/3 b))))))))
#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) (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 (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)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* r (* (pow (cos b) 2) (sin b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (* r (* (cos b) (pow (sin b) 2)))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (* r (* (cos b) (pow (sin b) 2))))) (* r (* (pow (cos b) 2) (sin b))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (pow (cos b) 2) (sin b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (* (cos b) (pow (sin b) 2))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (+ (* a (+ (* a (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (* (cos b) (pow (sin b) 2)))) (* (pow (cos b) 2) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (* (cos b) (sin b)))) (* (cos b) (sin b))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* 1/120 (* (pow a 2) (* (cos b) (sin b))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (* (cos b) (sin b)))) (* 1/120 (* (cos b) (sin b)))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (* (pow (cos a) 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 (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (pow (sin b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* -1/3 (* (pow a 2) (pow (sin b) 2))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 2/45 (* (pow a 2) (pow (sin b) 2))))) (pow (sin b) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow a 2) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* (pow a 2) (+ (* -1/315 (* (pow a 2) (pow (sin b) 2))) (* 2/45 (pow (sin b) 2)))))) (pow (sin b) 2)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (* 1/3 (pow (cos b) 2)))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (+ (* (pow a 2) (+ (* -1/3 (pow (sin b) 2)) (+ (* 1/3 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (pow (cos b) 2)) (* 2/45 (pow (sin b) 2))))))) (pow (sin b) 2)))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (cos b) 2))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* 1/3 (* (pow a 2) (pow (cos b) 2))))) (pow (cos b) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (pow (cos b) 2)) (* (pow a 2) (+ (* -2/45 (* (pow a 2) (pow (cos b) 2))) (* 1/3 (pow (cos b) 2)))))) (pow (cos b) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* a (- (* 7/8 (* a (pow (cos b) 3))) (pow (sin b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos b) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow a 2) (pow (cos b) 3))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* 7/8 (* (pow a 2) (pow (cos b) 3))))) (pow (cos b) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -3/2 (pow (cos b) 3)) (* (pow a 2) (+ (* -61/240 (* (pow a 2) (pow (cos b) 3))) (* 7/8 (pow (cos b) 3)))))) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 1))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* -3/2 (pow a 2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 7/8 (pow a 2)) 3/2)))))
#s(approx (pow (cos a) 3) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 7/8 (* -61/240 (pow a 2)))) 3/2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b))))))) (pow (cos b) 6)) (/ (* r (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 7)))))) (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (* r (pow (sin b) 4)) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b))))))) (pow (cos b) 6)) (/ (* r (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 7)))))) (/ (* r (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (pow (cos b) 5))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 6))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ r (pow (cos b) 2))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (/ r (pow (cos b) 2)) (/ (* a (* r (sin b))) (pow (cos b) 3)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 4))) (/ (* r (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (* r (sin b)) (pow (cos b) 3))))) (/ r (pow (cos b) 2)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 4))) (+ (/ (* r (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 5)) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 4))) (/ (* r (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4)))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 4))) (/ (* r (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (* r (sin b)) (pow (cos b) 3))))) (/ r (pow (cos b) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* -1 (* a (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* -1 (pow (cos b) 2))) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (cos b) (sin b))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* (cos b) (sin b)) (* (pow a 2) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (* (cos b) (sin b))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* (cos b) (sin b)) (* (pow a 2) (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 2))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (* (cos b) (sin b))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (* (cos b) (sin b)) (* (pow a 2) (- (+ (* a (- (+ (* -2 (/ (pow (sin b) 4) (pow (cos b) 2))) (* a (- (/ (* (sin b) (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (pow (cos b) 3)) (+ (* -3/2 (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (* (cos b) (sin b))))) (* 7/8 (* (cos b) (sin b))))))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 2))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (* (cos b) (sin b))))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* (pow (cos b) 4) (sin b))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (+ (* (pow a 2) (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))) (* (pow (cos b) 4) (sin b)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (* a (* (cos b) (pow (sin b) 4)))) (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 4) (sin b)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (+ (* (pow a 2) (+ (* a (+ (* -2 (* (cos b) (pow (sin b) 4))) (* a (* (sin b) (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))))) (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (* (pow (cos b) 4) (sin b)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow a 2) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (* a (* (cos b) (pow (sin b) 3)))) (* -2 (pow (cos b) 4))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (pow (cos b) 4)) (* a (- (* a (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* 2 (* (cos b) (pow (sin b) 3)))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos b) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (/ (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 (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ (sin b) (* a (cos b)))))
#s(approx (* a (cos b)) #s(hole binary64 (* a (cos b))))
#s(approx (/ b (cos a)) #s(hole binary64 b))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (/ b (cos a)) #s(hole binary64 (+ b (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1/720 b) (+ (* 1/48 b) (* 1/2 (+ (* -1/4 b) (* 1/24 b))))))) (+ (* -1/4 b) (* 1/24 b)))) (* -1/2 b))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (+ b (* 1/2 (* (pow a 2) b)))))
#s(approx (* 1/2 (* (* a a) b)) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (* (* a a) b) #s(hole binary64 (* (pow a 2) b)))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (pow b 2)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* 1/2 (* a b)) (pow b 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (+ b (* a (+ (* a (+ (* 1/2 b) (* a (* b (- (* -1/6 b) (* -1 b)))))) (pow b 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 1))
#s(approx (+ 1 (* a b)) #s(hole binary64 (+ 1 (* a b))))
#s(approx (* a b) #s(hole binary64 (* a b)))
#s(approx (/ 1 (cos a)) #s(hole binary64 1))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* 1/2 (pow a 2)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* 5/24 (pow a 2)))))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (+ 1 (* (pow a 2) (+ 1/2 (* (pow a 2) (+ 5/24 (* 61/720 (pow a 2)))))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (* 1/24 (* a a)) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b)))))) (pow (cos b) 6)) (/ (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 7)))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #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)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (* -2 (/ (pow (sin b) 4) (pow (cos b) 4))) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 2) (pow (sin b) 3))) (+ (* -1 (* (pow (cos b) 3) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 3/2 (* (pow (cos b) 4) (sin b)))))) (pow (cos b) 6)) (/ (* (pow (sin b) 2) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 7)))))) (/ (* (sin b) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 5))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -3/2 (pow (cos b) 5)) (* (pow (cos b) 3) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 6))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ (sin b) (pow (cos b) 2))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (/ (sin b) (pow (cos b) 2)) (/ (* a (pow (sin b) 2)) (pow (cos b) 3)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 4))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 3))))) (/ (sin b) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 4))) (+ (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 4))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4)))) (cos b)) (/ (* (pow (sin b) 2) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 5)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 4))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 4))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 3))))) (/ (sin b) (pow (cos b) 2)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos b) (* (pow a 2) (- (* -2 (cos b)) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos b) (* (pow a 2) (- (+ (* -2 (cos b)) (* a (- (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 2)))))) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (cos b))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos b) (* (pow a 2) (- (+ (* -2 (cos b)) (* a (- (+ (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (* a (- (* 5/3 (cos b)) (+ (* -3/2 (- (* -2 (cos b)) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (cos b))))) (+ (* 7/8 (cos b)) (+ (* 2 (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 2))) (/ (pow (sin b) 4) (pow (cos b) 3)))))))) (* -1 (/ (pow (sin b) 3) (pow (cos b) 2)))))) (+ (* -3/2 (cos b)) (/ (pow (sin b) 2) (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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 1))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* 1/6 (* (pow a 2) b))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* -1/120 (* (pow a 2) b)) (* 1/6 b)))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* a (+ (* -1 b) (* (pow a 2) (+ (* 1/6 b) (* (pow a 2) (+ (* -1/120 b) (* 1/5040 (* (pow a 2) b))))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a b)))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* -1/6 (* (pow a 2) b))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* 1/120 (* (pow a 2) b))))))))
#s(approx (* b (sin a)) #s(hole binary64 (* a (+ b (* (pow a 2) (+ (* -1/6 b) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) b)) (* 1/120 b)))))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 1))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* -1 a) (/ 1 b))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* a (- (* -1/2 (/ a b)) 1)) (/ 1 b))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* a (- (* a (- (* 1/6 a) (* 1/2 (/ 1 b)))) 1)) (/ 1 b))))
#s(approx (/ (cos a) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (cos a) b) #s(hole binary64 (+ (* -1/2 (/ (pow a 2) b)) (/ 1 b))))
#s(approx (/ (cos a) b) #s(hole binary64 (+ (* (pow a 2) (- (* 1/24 (/ (pow a 2) b)) (* 1/2 (/ 1 b)))) (/ 1 b))))
#s(approx (/ (cos a) b) #s(hole binary64 (+ (* (pow a 2) (- (* (pow a 2) (+ (* -1/720 (/ (pow a 2) b)) (* 1/24 (/ 1 b)))) (* 1/2 (/ 1 b)))) (/ 1 b))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (* -1 (* a b)) #s(hole binary64 (* -1 (* a b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 1))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* a (+ (* -1 b) (* -1/2 a)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1 b)))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* -1/2 a)))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* a (- (* 1/6 (* a b)) 1/2))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (* 1/6 (* a b)) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow b 2))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (* 1/4 (pow b 2)) 1/2))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (- (+ (* 1/6 (* a b)) (* 1/4 (pow b 2))) 1/2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1 (* a b)) (* -1/2 (pow b 2)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* 1/4 (* a (pow b 2))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* -1 b) (* a (+ (* 1/6 (* a b)) (* 1/4 (pow b 2)))))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1 a) (* -1/2 b))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* a (+ (* 1/6 a) (* 1/4 b))) 1)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 b)))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* 1/4 (* (pow a 2) b)))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* -1/48 (* (pow a 2) b)) (* 1/4 b))))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (+ (* -1/2 b) (* (pow a 2) (+ (* 1/4 b) (* (pow a 2) (+ (* -1/48 b) (* 1/1440 (* (pow a 2) b)))))))))
#s(approx (cos (+ a 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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 1))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))))))
#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 (* (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 (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 1))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (* -1 (* a b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (* a (+ (* -1 b) (* -1/2 a))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* -1 (* a b))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* a (+ (* -1 b) (* -1/2 a)))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1 b)))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (* -1/2 a) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* 1/6 (* a (pow b 3)))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* a (+ (* -1/36 (* (pow a 2) (pow b 3))) (* 1/6 (pow b 3))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* a (+ (* 1/6 (pow b 3)) (* (pow a 2) (+ (* -1/36 (pow b 3)) (* 1/720 (* (pow a 2) (pow b 3)))))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* a (+ (* 1/6 (pow b 3)) (* (pow a 2) (+ (* -1/36 (pow b 3)) (* (pow a 2) (+ (* -1/30240 (* (pow a 2) (pow b 3))) (* 1/720 (pow b 3))))))))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (pow b 3))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (+ (* -1/6 (* (pow a 2) (pow b 3))) (pow b 3)))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (+ (* (pow a 2) (+ (* -1/6 (pow b 3)) (* 1/120 (* (pow a 2) (pow b 3))))) (pow b 3)))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* a (+ (* (pow a 2) (+ (* -1/6 (pow b 3)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (pow b 3))) (* 1/120 (pow b 3)))))) (pow b 3)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (* b (- (* 1/6 (pow b 2)) 1)))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* a (- (* 1/4 (pow b 2)) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* a (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)) (* b (- (* 1/6 (pow b 2)) 1)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* 1/4 (pow b 2)) 1/2)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))) 1/2)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* 1/4 (pow b 2))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2))))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (* b (- (* 1/6 (pow b 2)) 1))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* 1/4 (* a (pow b 2))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (+ (* -1/2 (pow b 2)) (* a (+ (* a (+ (* 1/4 (pow b 2)) (* a (* b (+ 1/6 (* -1/36 (pow b 2))))))) (* b (- (* 1/6 (pow b 2)) 1)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1/2 b)))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (* 1/6 (pow b 2)) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* 1/4 (* a b))) 1)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (+ (* -1/2 b) (* a (- (+ (* 1/6 (pow b 2)) (* a (+ (* 1/4 b) (* a (+ 1/6 (* -1/36 (pow b 2))))))) 1)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 b)))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* 1/6 (* a (pow b 2))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* 1/4 (* a b)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (+ (* -1/2 b) (* a (+ (* 1/6 (pow b 2)) (* a (+ (* -1/36 (* a (pow b 2))) (* 1/4 b))))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* 1/4 a))) 1/2)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (- (* a (+ (* 1/6 b) (* a (+ 1/4 (* -1/36 (* a b)))))) 1/2)))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ b a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (/ (+ a b) a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 a)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ 1 (/ a b)) #s(hole binary64 1))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#s(approx (pow a -1) #s(hole binary64 (/ 1 a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b))) #s(hole binary64 (cos b)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (- a b) #s(hole binary64 (* -1 b)))
#s(approx (- a b) #s(hole binary64 (- a b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (sin b) (sin (+ b (* 1/2 (PI))))))))) (/ (* (cos (+ b (* 1/2 (PI)))) (sin b)) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (sin b) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* b (+ 1 (* 1/2 (/ (PI) b)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* -1 (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (+ (* -1 (+ 1 (* 1/2 (/ (PI) b)))) (* -1 (/ a b)))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ (+ (* -1 (+ 1 (* 1/2 (/ (PI) b)))) (* -1 (/ a b))) a)))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (/ (+ 1 (* 1/2 (/ (PI) b))) a)))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))) (sin (- (* 1/2 (PI)) (* -1 b))))) (+ (* -1/6 (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (* 1/2 (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* r (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b))) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b))))))) (sin (- (* 1/2 (PI)) (* -1 b))))) (+ (* -1/6 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))) (* 1/2 (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2))))))) (+ (* -1 (/ (* (pow (cos (- (* 1/2 (PI)) (* -1 b))) 2) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 3))) (* -1/2 (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))) (/ (* (cos (- (* 1/2 (PI)) (* -1 b))) (sin b)) (pow (sin (- (* 1/2 (PI)) (* -1 b))) 2)))) (/ (sin b) (sin (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* -1 b))) (* a (cos (- (* 1/2 (PI)) (* -1 b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* -1 b))) (* a (+ (cos (- (* 1/2 (PI)) (* -1 b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) (* -1 b))))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) (* -1 b))) (* a (+ (cos (- (* 1/2 (PI)) (* -1 b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) (* -1 b)))) (* -1/6 (* a (cos (- (* 1/2 (PI)) (* -1 b))))))))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) (* -1 b))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (- (+ a (* 1/2 (PI))) (* -1 b))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 b))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (+ a b)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (- (pow a 2) (pow b 2))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* a (* r (* (sin b) (- (sin b) (* -1 (sin b)))))) (pow (cos b) 2))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* -1/4 (/ (* r (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2))) (pow (cos b) 3)))))) (* -1/2 (/ (* r (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (sin b) (- (* -1/6 (sin b)) (* 1/6 (sin b))))) (pow (cos b) 2))) (+ (* -1/4 (/ (* r (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))) (* 1/2 (/ (* (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* -1/4 (/ (* r (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2))) (pow (cos b) 3)))) (- (sin b) (* -1 (sin b)))) (cos b))))))) (+ (* -1/2 (/ (* r (sin b)) (cos b))) (* -1/4 (/ (* r (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2))) (pow (cos b) 3)))))) (* -1/2 (/ (* r (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (+ (* 1/2 (/ (* a (* (sin b) (- (sin b) (* -1 (sin b))))) (pow (cos b) 2))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1/2 (/ (sin b) (cos b))) (* -1/4 (/ (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2)) (pow (cos b) 3)))))) (* -1/2 (/ (* (sin b) (- (sin b) (* -1 (sin b)))) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* (sin b) (- (* -1/6 (sin b)) (* 1/6 (sin b)))) (pow (cos b) 2))) (+ (* -1/4 (/ (* (sin b) (- (sin b) (* -1 (sin b)))) (pow (cos b) 2))) (* 1/2 (/ (* (+ (* -1/2 (/ (sin b) (cos b))) (* -1/4 (/ (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2)) (pow (cos b) 3)))) (- (sin b) (* -1 (sin b)))) (cos b))))))) (+ (* -1/2 (/ (sin b) (cos b))) (* -1/4 (/ (* (sin b) (pow (- (sin b) (* -1 (sin b))) 2)) (pow (cos b) 3)))))) (* -1/2 (/ (* (sin b) (- (sin b) (* -1 (sin b)))) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (+ (cos b) (* -1/2 (* a (- (sin b) (* -1 (sin b))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (* 1/2 (- (sin b) (* -1 (sin b)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* -1/2 (* a (- (* -1/6 (sin b)) (* 1/6 (sin b))))))) (* 1/2 (- (sin b) (* -1 (sin b)))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (* a (- (sin b) (* -1 (sin b)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* a (+ (* 1/2 (* (pow a 2) (- (* -1/6 (sin b)) (* 1/6 (sin b))))) (* 1/2 (- (sin b) (* -1 (sin b))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* a (+ (* 1/2 (- (sin b) (* -1 (sin b)))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/120 (sin b)) (* -1/120 (sin b))))) (* 1/2 (- (* -1/6 (sin b)) (* 1/6 (sin b))))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* a (+ (* 1/2 (- (sin b) (* -1 (sin b)))) (* (pow a 2) (+ (* 1/2 (- (* -1/6 (sin b)) (* 1/6 (sin b)))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/5040 (sin b)) (* 1/5040 (sin b))))) (* 1/2 (- (* 1/120 (sin b)) (* -1/120 (sin b))))))))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (sin b) (* -1 (sin b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (+ (sin b) (* (pow a 2) (- (* -1/6 (sin b)) (* 1/6 (sin b))))) (* -1 (sin b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (+ (sin b) (* (pow a 2) (- (+ (* -1/6 (sin b)) (* (pow a 2) (- (* 1/120 (sin b)) (* -1/120 (sin b))))) (* 1/6 (sin b))))) (* -1 (sin b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (* a (- (+ (sin b) (* (pow a 2) (- (+ (* -1/6 (sin b)) (* (pow a 2) (- (+ (* 1/120 (sin b)) (* (pow a 2) (- (* -1/5040 (sin b)) (* 1/5040 (sin b))))) (* -1/120 (sin b))))) (* 1/6 (sin b))))) (* -1 (sin b))))))
#s(approx (cos (- b a)) #s(hole binary64 (cos b)))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos b) (* a (sin b)))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (* -1 (sin b)))))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* -1/6 (* a (sin b))))) (* -1 (sin b)))))))
#s(approx (- b a) #s(hole binary64 b))
#s(approx (- b a) #s(hole binary64 (+ b (* -1 a))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos b)))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* a (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* a (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* a (+ (* -1 (cos (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* a (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (* (cos a) (cos 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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3)) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (pow (cos b) 3)) (+ (* -3/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (* -1 (/ (* r (pow (sin b) 4)) (pow (cos b) 4)))))) (/ (* r (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2)))) (pow (cos b) 3))) (* -3/2 (/ (* r (sin b)) (cos b))))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2)))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3)) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (* a (+ (* a (- (+ (* a (- (/ (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (cos b) 3)) (+ (* -3/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (* -1 (/ (pow (sin b) 4) (pow (cos b) 4)))))) (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 3))) (* -3/2 (/ (sin b) (cos b))))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/ (sin b) (cos b)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* a (- (* a (- (+ (* -3/2 (cos b)) (* a (- (* -1 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (pow (cos b) 2))) (+ (* -1/2 (sin b)) (+ (* -1/6 (sin b)) (/ (* (sin b) (- (* -3/2 (cos b)) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (cos b)))))))) (+ (* -1 (cos b)) (+ (* -1 (/ (pow (sin b) 2) (cos b))) (/ (pow (sin b) 2) (cos b)))))) (sin b))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (+ (* a (+ (* -1 (pow (cos b) 2)) (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2)))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos b)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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 (* (sin a) (sin b)) 2) (* (sin a) (sin b))) #s(hole binary64 (* (pow a 3) (pow (sin b) 3))))
#s(approx (* (pow (* (sin a) (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) (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) (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) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (pow (sin b) 2)) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* a (+ (* a (+ (* a (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/3 (* a (pow (sin b) 2))) (* -1/6 (* (cos b) (sin b)))))) (pow (sin b) 2))) (* (cos b) (sin b))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (* (cos b) (sin b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (* 1/12 (* (cos b) (sin b)))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* a (+ (* (cos b) (sin b)) (* (pow a 2) (+ (* -1/2 (* (cos b) (sin b))) (+ (* -1/6 (* (cos b) (sin b))) (* (pow a 2) (+ (* 1/120 (* (cos b) (sin b))) (+ (* 1/24 (* (cos b) (sin b))) (+ (* 1/12 (* (cos b) (sin b))) (* (pow a 2) (+ (* -1/144 (* (cos b) (sin b))) (+ (* -1/240 (* (cos b) (sin b))) (+ (* -1/720 (* (cos b) (sin b))) (* -1/5040 (* (cos b) (sin b))))))))))))))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* r (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))))) (pow (cos b) 11)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 12))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (/ (* r (* (sin b) (+ (* -2 (* (pow (cos b) 7) (pow (sin b) 3))) (* (pow (cos b) 7) (pow (sin b) 3))))) (pow (cos b) 11)) (+ (* -1 (/ (* (sin b) (- (/ (* r (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))))) (pow (cos b) 11)) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 12))))) (cos b))) (+ (/ (* r (* (sin b) (+ (* -1 (* (pow (cos b) 9) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 9/2 (* (pow (cos b) 10) (sin b)))))) (pow (cos b) 12)) (/ (* r (* (pow (sin b) 2) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 13)))))) (/ (* r (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2))))))) (pow (cos b) 11))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (/ (* r (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2)))))) (pow (cos b) 12))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 11)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 12))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* a (- (/ (* (sin b) (+ (* -2 (* (pow (cos b) 7) (pow (sin b) 3))) (* (pow (cos b) 7) (pow (sin b) 3)))) (pow (cos b) 11)) (+ (* -1 (/ (* (sin b) (- (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 11)) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 12))))) (cos b))) (+ (/ (* (sin b) (+ (* -1 (* (pow (cos b) 9) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* 9/2 (* (pow (cos b) 10) (sin b))))) (pow (cos b) 12)) (/ (* (pow (sin b) 2) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 13)))))) (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 11))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (/ (* (sin b) (+ (* -9/2 (pow (cos b) 11)) (* (pow (cos b) 9) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))))) (pow (cos b) 12))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos b)))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -9/2 (cos b)) (* -1 (cos b))) (+ (* -3 (cos b)) (* -2 (cos b))))))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (- (+ (* -9/2 (cos b)) (+ (* -1 (cos b)) (* a (- (+ (* -1 (/ (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))) (cos b))) (* 9/2 (sin b))) (+ (* -2 (/ (pow (sin b) 3) (pow (cos b) 2))) (+ (* -1 (/ (* (sin b) (+ (* -3 (pow (cos b) 10)) (* (pow (cos b) 6) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))))) (pow (cos b) 10))) (/ (pow (sin b) 3) (pow (cos b) 2)))))))) (+ (* -3 (cos b)) (* -2 (cos b))))))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (pow (cos b) 3)))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow a 2) (- (* -9/2 (pow (cos b) 3)) (* -3 (pow (cos b) 3)))) (pow (cos b) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -9/2 (pow (cos b) 3)) (* -1 (* a (pow (sin b) 3)))) (* -3 (pow (cos b) 3)))) (pow (cos b) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -9/2 (pow (cos b) 3)) (* a (- (* a (- (* 75/8 (pow (cos b) 3)) (+ (* -3 (- (* -9/2 (pow (cos b) 3)) (* -3 (pow (cos b) 3)))) (* 4 (pow (cos b) 3))))) (pow (sin b) 3)))) (* -3 (pow (cos b) 3)))) (pow (cos b) 3))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (pow (cos b) 9)))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* -9/2 (* (pow a 2) (pow (cos b) 9))) (pow (cos b) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* 75/8 (* (pow a 2) (pow (cos b) 9))))) (pow (cos b) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* (pow a 2) (+ (* -961/80 (* (pow a 2) (pow (cos b) 9))) (* 75/8 (pow (cos b) 9)))))) (pow (cos b) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (pow (cos b) 9)))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* -9/2 (* (pow a 2) (pow (cos b) 9))) (pow (cos b) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* 75/8 (* (pow a 2) (pow (cos b) 9))))) (pow (cos b) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow a 2) (+ (* -9/2 (pow (cos b) 9)) (* (pow a 2) (+ (* -961/80 (* (pow a 2) (pow (cos b) 9))) (* 75/8 (pow (cos b) 9)))))) (pow (cos b) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (pow (sin b) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (+ (* -3/2 (* (pow a 2) (pow (sin b) 9))) (pow (sin b) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (+ (* (pow a 2) (+ (* -3/2 (pow (sin b) 9)) (* 43/40 (* (pow a 2) (pow (sin b) 9))))) (pow (sin b) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow a 9) (+ (* (pow a 2) (+ (* -3/2 (pow (sin b) 9)) (* (pow a 2) (+ (* -2473/5040 (* (pow a 2) (pow (sin b) 9))) (* 43/40 (pow (sin b) 9)))))) (pow (sin b) 9)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (pow (cos b) 6)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* -3 (* (pow a 2) (pow (cos b) 6))) (pow (cos b) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (* (pow (cos b) 3) (pow (sin b) 3))))) (pow (cos b) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -3 (pow (cos b) 6)) (* a (+ (* 4 (* a (pow (cos b) 6))) (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (cos b) 6))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* a (pow (sin b) 6))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* a (+ (* a (+ (* 13/120 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 3/4 (* (pow (cos b) 3) (pow (sin b) 3))) (* 7/8 (* (pow (cos b) 3) (pow (sin b) 3)))))) (pow (sin b) 6)))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (* (pow (cos b) 3) (pow (sin b) 3)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* (pow a 2) (+ (* 13/120 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 3/4 (* (pow (cos b) 3) (pow (sin b) 3))) (* 7/8 (* (pow (cos b) 3) (pow (sin b) 3))))))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow a 3) (+ (* (pow a 2) (+ (* -3/2 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -1/2 (* (pow (cos b) 3) (pow (sin b) 3))) (* (pow a 2) (+ (* 13/120 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 3/4 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* 7/8 (* (pow (cos b) 3) (pow (sin b) 3))) (* (pow a 2) (+ (* -7/16 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -61/240 (* (pow (cos b) 3) (pow (sin b) 3))) (+ (* -13/80 (* (pow (cos b) 3) (pow (sin b) 3))) (* -41/3024 (* (pow (cos b) 3) (pow (sin b) 3)))))))))))))) (* (pow (cos b) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (* (cos b) (sin b))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -2 (pow (cos b) 2)) (* a (- (* -2 (/ (pow (sin b) 3) (cos b))) (+ (* -1 (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))) (+ (* -1 (/ (* (sin b) (- (* -2 (pow (cos b) 2)) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (cos b))) (/ (* (sin b) (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (cos b))))))) (+ (* -1 (pow (cos b) 2)) (* -1 (pow (sin b) 2))))) (* -1 (* (cos b) (sin b))))) (pow (cos b) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos b) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (* -2 (pow (cos b) 4)) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (* a (* (cos b) (pow (sin b) 3)))) (* -2 (pow (cos b) 4))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* -2 (pow (cos b) 4)) (* a (- (* a (- (* 5/3 (pow (cos b) 4)) (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4)))) (* 2 (* (cos b) (pow (sin b) 3)))))) (* (pow (cos b) 2) (pow (sin b) 2)))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos b) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (cos b) 4))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* 5/3 (* (pow a 2) (pow (cos b) 4))))) (pow (cos b) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow (cos b) 4)) (* (pow a 2) (+ (* -34/45 (* (pow a 2) (pow (cos b) 4))) (* 5/3 (pow (cos b) 4)))))) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (* (pow (cos b) 2) (pow (sin b) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* a (* (cos b) (pow (sin b) 3)))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (pow (sin b) 4))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow a 2) (+ (* a (+ (* 2 (* (cos b) (pow (sin b) 3))) (* a (+ (* 2 (* (cos b) (* (sin b) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b))))))) (+ (* a (+ (* -2/3 (* (cos b) (pow (sin b) 3))) (* 2 (* (pow (sin b) 2) (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))))) (pow (sin b) 4)))))) (* (pow (cos b) 2) (pow (sin b) 2))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos b) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* a (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (pow (cos b) 2)) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* a (- (* a (- (+ (* -1 (* a (+ (* -1/2 (* (cos b) (sin b))) (* -1/6 (* (cos b) (sin b)))))) (* -1 (pow (cos b) 2))) (pow (sin b) 2))) (* (cos b) (sin b)))) (pow (cos b) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos 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) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))) (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)) 2))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (+ (* -1 (/ (* (+ (* -1 (/ (* r (* (sin b) (pow (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)) 2))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))))) (/ (* r (* (sin b) (- (* 1/6 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1/6 (sin b))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)) 2))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2))))) (/ (* r (* (sin b) (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b)))) (pow (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b)))) 2)))) (/ (* r (sin b)) (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (* (cos (* 1/2 (PI))) (sin (neg b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (+ (* a (- (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (sin b))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (+ (* a (- (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* a (+ (* -1/2 (cos b)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b))))))) (sin b))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos b) (+ (* a (- (+ (* -1 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* a (+ (* -1/2 (cos b)) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg b)))) (* a (- (* 1/6 (* (cos (neg b)) (cos (* 1/2 (PI))))) (* -1/6 (sin b)))))))) (sin b))) (* (cos (* 1/2 (PI))) (sin (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg b))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* -1 (* a (cos (neg b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* -1/2 (* a (sin (neg b)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg b)) (* a (+ (* -1 (cos (neg b))) (* a (+ (* -1/2 (sin (neg b))) (* 1/6 (* a (cos (neg b)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos b)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* (pow b 2) r)))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (+ (* (pow b 2) r) (/ (* b r) a))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* a r)))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* a (+ r (/ r (* a b))))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow a 2)) 1/2))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(hole binary64 (* (pow a 6) (- (+ (* 1/24 (/ 1 (pow a 2))) (/ 1 (pow a 6))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(hole binary64 (* (pow a 2) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (* b r))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* a (+ (* b r) (/ r a)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))))
#s(approx (* b (cos a)) #s(hole binary64 (* b (cos a))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (* b (pow (cos a) 2)) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (pow (cos a) 2) #s(hole binary64 (pow (cos a) 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 (sin a) #s(hole binary64 (sin a)))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 a))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* (cos b) (* (sin a) (sin b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (pow (cos a) 2) (pow (cos b) 2)) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow (sin a) 2) (pow (sin b) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (* (pow (cos a) 2) (pow (cos b) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (* (pow (cos a) 3) (pow (cos b) 3))))
#s(approx (pow (cos a) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))))
#s(approx (/ b (cos a)) #s(hole binary64 (/ b (cos a))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* 1/2 (* (pow a 2) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 b) (/ b (pow a 2))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2)))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a b)))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* a (+ b (/ 1 a)))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(hole binary64 (* (pow a 4) (- (+ 1/24 (/ 1 (pow a 4))) (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* 1/24 (pow a 4))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) #s(hole binary64 (* (pow a 4) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(hole binary64 (* (pow a 2) (- 1/24 (* 1/2 (/ 1 (pow a 2)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* (sin b) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3)))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ (sin b) (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (- (* (pow (cos a) 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))) (+ (* (* (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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (* -1 (* b (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (+ (* -1 (sin a)) (/ (cos a) b))))
#s(approx (/ (cos a) b) #s(hole binary64 (/ (cos a) b)))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* -1 (* a b))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* a (+ (* -1 b) (/ 1 a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* 1/6 (* (pow a 3) b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* (pow a 3) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (/ b (pow a 2))) (* 1/6 b)) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (/ b (pow a 2))) (+ (* 1/6 b) (/ 1 (pow a 3)))) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* 1/6 (* (pow a 3) b))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* (pow a 3) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* (pow a 3) (- (+ (* -1 (/ b (pow a 2))) (* 1/6 b)) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* 1/6 (* (pow a 2) b))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* (pow a 2) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ b (pow a 2))) (* 1/6 b)) (* 1/2 (/ 1 a))))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* 1/6 (* (pow a 2) b))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* (pow a 2) (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* a (- (* 1/6 b) (* 1/2 (/ 1 a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (- (* -1/2 (* b (cos a))) (sin a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* -1/2 (* b (cos a))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#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 (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* (pow a 2) (- (* -1 (/ b a)) 1/2))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ b a)) (/ 1 (pow a 2))) 1/2))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* (pow a 2) (- (* -1 (/ b a)) 1/2))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1/2))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (* (pow b 3) (sin a)) #s(hole binary64 (* (pow b 3) (sin a))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1/2 (/ (pow b 2) (pow a 3))) (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (+ (/ 1 (pow a 3)) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow a 3) (- (+ (* -1/2 (/ (pow b 2) (pow a 3))) (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2))))) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow a 3) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow a 3) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (/ (pow b 2) a)) (+ (* b (+ 1/6 (* -1/36 (pow b 2)))) (/ (* b (- (* 1/6 (pow b 2)) 1)) (pow a 2)))) (* 1/2 (/ 1 a))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* a (- (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))) (* 1/2 (/ 1 a))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* a (* b (+ 1/6 (* -1/36 (pow b 2)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* a (+ (* 1/4 (/ (pow b 2) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 1))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (/ a b)))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (* a (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (- a b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (- a b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (- a b) #s(hole binary64 a))
#s(approx (- a b) #s(hole binary64 (* a (+ 1 (* -1 (/ b a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 a))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* a (+ 1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (/ a b)))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* -1 (/ a b))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b)))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ -1 b)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (- a b))) (/ (pow b 2) (- a b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (- a b))) (/ (pow b 2) (- a b))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (+ 1 (* 1/2 (/ (PI) a))) (* -1 (/ b a))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (+ 1 (+ (* -1 (/ (+ (* -1 (pow b 2)) (pow b 2)) (pow a 2))) (* 1/2 (/ (PI) a)))) (* -1 (/ b a))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 a))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (pow a 2)))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow a 2) (+ 1 (* -1 (/ (pow b 2) (pow a 2)))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* 1/2 (- (cos (- b a)) (cos (+ a b))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (* (cos a) (cos b)) (* 1/2 (- (cos (- b a)) (cos (+ a b)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (- b a)) (cos (+ a b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (- b a)) (cos (+ a b)))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (- b a))))
#s(approx (- b a) #s(hole binary64 (* -1 a)))
#s(approx (- b a) #s(hole binary64 (* a (- (/ b a) 1))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (* (cos a) (cos b)) (* (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 b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (* (pow (sin a) 3) (pow (sin b) 3))) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 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 (* (sin a) (sin b)) 2) (* (sin a) (sin b))) #s(hole binary64 (* (pow (sin a) 3) (pow (sin b) 3))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* (cos a) (* (cos b) (* (sin a) (sin b))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* (sin b) (* (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))) (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ (* (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))) (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))) (* (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))) (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (/ (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9))) (+ (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6)))))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (- (* (pow (cos a) 9) (pow (cos b) 9)) (* (pow (sin a) 9) (pow (sin b) 9)))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (* (pow (cos a) 9) (pow (cos b) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow (sin a) 9) (pow (sin b) 9))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (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)))) (+ (* (pow (cos a) 6) (pow (cos b) 6)) (* (pow (sin a) 6) (pow (sin b) 6))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (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)))) (* (pow (sin a) 6) (pow (sin b) 6)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow (cos a) 3) (* (pow (cos b) 3) (* (pow (sin a) 3) (pow (sin b) 3))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (/ (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)) (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2)))))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (- (* (pow (cos a) 4) (pow (cos b) 4)) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (* (pow (cos a) 4) (pow (cos b) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (- (* (pow (cos a) 2) (pow (cos b) 2)) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (* (pow (sin a) 2) (pow (sin b) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos (+ a b)) (* (cos (* 1/2 (PI))) (sin (neg (+ a b)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg (+ a b)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (* (cos (+ a b)) 1) #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 (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (* -1 (* a (+ (* -1 r) (* -1 (/ r (* a b))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* a (+ (* -1 (* b r)) (* -1 (/ r a)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (sin b) (* a (cos b)))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* a (- (* -1 b) (/ 1 a))))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* -1 (* a (- b (/ 1 a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1/6 b) (* 1/2 (/ 1 a)))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (* -1 (/ b a)) 1/2) a)) (* -1/6 b))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (* -1 (/ (- b (/ 1 a)) a)) 1/2) a)) (* -1/6 b))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1/6 b) (* 1/2 (/ 1 a)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (/ (- (* -1 (/ b a)) 1/2) a)) (* -1/6 b))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ 1/2 (/ b a)) a)) (* 1/6 b)))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/6 b) (* 1/2 (/ 1 a)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* (pow a 2) (- (* -1 (/ (- b (/ 1 a)) a)) 1/2))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1 (* a (+ 1/2 (/ b a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* 1/4 (pow b 2)) (/ (* b (- (* 1/6 (pow b 2)) 1)) a)) 1/2) a)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (* b (- (* 1/6 (pow b 2)) 1))) (* -1 (/ (+ 1 (* -1/2 (pow b 2))) a))) a)) (* 1/4 (pow b 2))) 1/2) a)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* 1/4 (pow b 2)) (/ (* b (- (* 1/6 (pow b 2)) 1)) a)) 1/2) a)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (* b (- (* 1/6 (pow b 2)) 1))) (* 1/2 (/ (pow b 2) a))) a)) (* 1/4 (pow b 2))) 1/2) a)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow a 3) (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (+ (* 1/4 (pow b 2)) (/ (* b (- (* 1/6 (pow b 2)) 1)) a)) 1/2) a)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (* -1 (- (* 1/4 (pow b 2)) 1/2)) (* -1 (/ (* b (- (* 1/6 (pow b 2)) 1)) a))) a)) (* b (+ 1/6 (* -1/36 (pow b 2))))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1 (/ (- (* 1/4 (pow b 2)) 1/2) a)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1 (* a (+ (* -1 (* b (+ 1/6 (* -1/36 (pow b 2))))) (* -1/4 (/ (pow b 2) a)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a))))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (- a b) #s(hole binary64 (* -1 (* a (- (/ b a) 1)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (* b (+ 1 (* 1/2 (/ (PI) b)))) a)) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (* -1 (* a (+ (* 1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))) (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (+ (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))) (* 1/2 (PI)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (/ (- (pow a 2) (pow b 2)) (+ b (* -1 a)))) (* 1/2 (PI))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (* (cos a) (cos b)) (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a)))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (+ b (* -1 a))) (cos (- b (* -1 a))))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (+ b (* -1 a)))))
#s(approx (- b a) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ b a)))))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 a) (* 1/2 (PI))))))
#s(approx (+ (neg a) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos (- b (* -1 a))) (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos (- b (* -1 a))) (* (cos (* 1/2 (PI))) (sin (- (* -1 a) b))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 a) b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* b (+ (* b r) (/ r a)))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a r) (/ r b)) #s(hole binary64 (/ (+ r (* a (* b r))) b)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ r (cos a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))) 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 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (pow (cos a) 3)))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (pow (* (cos a) (cos b)) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (* (pow b 2) (pow (sin a) 3))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* 13/120 (* (pow b 2) (pow (sin a) 3))))) (pow (sin a) 3)))))
#s(approx (pow (* (sin a) (sin b)) 3) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* -1/2 (pow (sin a) 3)) (* (pow b 2) (+ (* -41/3024 (* (pow b 2) (pow (sin a) 3))) (* 13/120 (pow (sin a) 3)))))) (pow (sin a) 3)))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin a) (sin b)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (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 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#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 (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* b r) (sin (* 1/2 (PI))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2 (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (cos (* 1/2 (PI))) (- (* -1/6 (/ r (sin (* 1/2 (PI))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI)))))))) (* -1/6 (/ r (sin (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/2 (/ r (sin (* 1/2 (PI)))))))) (/ (* r (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))) (/ r (sin (* 1/2 (PI))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (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 (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (* r (pow (cos a) 2)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (* r (* (cos a) (sin a)))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* b (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))) (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))))) (* r (* (cos a) (sin a))))) (* r (pow (cos a) 2))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (pow (cos a) 2))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (* (cos a) (sin a))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (+ (* b (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))))) (* (cos a) (sin a)))) (pow (cos a) 2)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (sin a))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (cos b) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (+ (* 1/12 (sin a)) (* (pow b 2) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (* (pow (cos a) 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 (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (pow (sin a) 2))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* -1/3 (* (pow b 2) (pow (sin a) 2))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 2/45 (* (pow b 2) (pow (sin a) 2))))) (pow (sin a) 2)))))
#s(approx (pow (* (sin a) (sin b)) 2) #s(hole binary64 (* (pow b 2) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* (pow b 2) (+ (* -1/315 (* (pow b 2) (pow (sin a) 2))) (* 2/45 (pow (sin a) 2)))))) (pow (sin a) 2)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (* 1/3 (pow (cos a) 2)))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (+ (* (pow b 2) (+ (* -1/3 (pow (sin a) 2)) (+ (* 1/3 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (pow (cos a) 2)) (* 2/45 (pow (sin a) 2))))))) (pow (sin a) 2)))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (pow (cos a) 2)))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (cos a) 2))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* 1/3 (* (pow b 2) (pow (cos a) 2))))) (pow (cos a) 2))))
#s(approx (pow (* (cos a) (cos b)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1 (pow (cos a) 2)) (* (pow b 2) (+ (* -2/45 (* (pow b 2) (pow (cos a) 2))) (* 1/3 (pow (cos a) 2)))))) (pow (cos a) 2))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* b (- (* 7/8 (* b (pow (cos a) 3))) (pow (sin a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (pow (cos a) 3)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* -3/2 (* (pow b 2) (pow (cos a) 3))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* 7/8 (* (pow b 2) (pow (cos a) 3))))) (pow (cos a) 3))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -3/2 (pow (cos a) 3)) (* (pow b 2) (+ (* -61/240 (* (pow b 2) (pow (cos a) 3))) (* 7/8 (pow (cos a) 3)))))) (pow (cos a) 3))))
#s(approx (pow (cos b) 3) #s(hole binary64 1))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* -3/2 (pow b 2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 7/8 (pow b 2)) 3/2)))))
#s(approx (pow (cos b) 3) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 7/8 (* -61/240 (pow b 2)))) 3/2)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (* -2 (/ (* r (pow (sin a) 3)) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 7)) (/ (* r (+ (* -1 (* (pow (cos a) 2) (pow (sin a) 3))) (+ (* -1 (* (pow (cos a) 4) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 3/2 (* (pow (cos a) 4) (sin a)))))) (pow (cos a) 6)))))) (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (* -2 (/ (* r (pow (sin a) 3)) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 7)) (/ (* r (+ (* -1 (* (pow (cos a) 2) (pow (sin a) 3))) (+ (* -1 (* (pow (cos a) 4) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 3/2 (* (pow (cos a) 4) (sin a)))))) (pow (cos a) 6)))))) (/ (* r (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 5))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 6))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ r (pow (cos a) 2))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (/ r (pow (cos a) 2)) (/ (* b (* r (sin a))) (pow (cos a) 3)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* b (- (* -1 (* b (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 4))) (/ (* r (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 4))))) (* -1 (/ (* r (sin a)) (pow (cos a) 3))))) (/ r (pow (cos a) 2)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (* b (+ (* -1 (/ (* r (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (pow (cos a) 3))) (+ (/ (* r (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 5)) (/ (* (sin a) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 4))) (/ (* r (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 4)))) (cos a)))))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 4))) (/ (* r (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 4))))) (* -1 (/ (* r (sin a)) (pow (cos a) 3))))) (/ r (pow (cos a) 2)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* -1 (* b (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (* -1 (pow (cos a) 2))) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) #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) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (cos a))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (* -1/6 (cos a))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (+ (* -1/6 (cos a)) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* b (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (+ (* -1/6 (cos a)) (* b (- (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* b (- (+ (* -1/6 (/ (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))) (pow (cos a) 3))) (+ (* 1/120 (cos a)) (* 5/3 (cos a)))) (+ (* -3/2 (- (+ (* -2 (cos a)) (* -1/6 (cos a))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))) (+ (* 7/8 (cos a)) (+ (* 2 (/ (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (cos a))) (/ (pow (sin a) 4) (pow (cos a) 3)))))))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a)))))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (pow (cos a) 4))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (+ (* -2 (pow (cos a) 4)) (* -1/6 (pow (cos a) 4)))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) #s(hole binary64 (* b (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (+ (* -1/6 (pow (cos a) 4)) (* b (+ (* -2 (* (cos a) (pow (sin a) 3))) (* b (- (+ (* -1/6 (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (+ (* 1/120 (pow (cos a) 4)) (* 5/3 (pow (cos a) 4)))) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (pow (cos a) 4)))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow b 2) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (* -2 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* b (- (* b (- (* 5/3 (pow (cos a) 4)) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* 2 (* (cos a) (pow (sin a) 3)))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (pow (cos a) 4)))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (pow (* (cos a) (cos b)) 4) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (/ (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 (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 (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 b))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 b))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* a b)))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* 1/3 b)))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) #s(hole binary64 (* b (+ 1 (* b (+ a (* b (+ 1/3 (* 2/3 (* a b))))))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (/ b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ b (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* 1/3 (/ b a)))) (/ 1 a)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) #s(hole binary64 (* b (+ (* b (+ 1 (* b (+ (* 2/3 b) (* 1/3 (/ 1 a)))))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (/ b a)))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* 1/3 (/ (pow b 2) a)) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (pow b 2) a)) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (/ (sin b) (* a (cos b))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* (pow b 2) (+ (* 17/315 (/ (pow b 2) a)) (* 2/15 (/ 1 a)))) (* 1/3 (/ 1 a)))) (/ 1 a)))))
#s(approx (* a (cos b)) #s(hole binary64 a))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* a (cos b)) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* b (+ 1 (* 1/2 (pow a 2))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (* 2 (PI))) (cos (* 2 (PI))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))) (cos (* 2 (PI))))) (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (* 2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (pow (cos (* 2 (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (* 1/6 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2)))))))) (* -1 (/ (* (sin (* 2 (PI))) (- 1 (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (cos (* 2 (PI)))))))) (* -1 (/ (pow (sin (* 2 (PI))) 2) (pow (cos (* 2 (PI))) 2))))) (/ (sin (* 2 (PI))) (cos (* 2 (PI)))))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (* 2 (PI))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (+ b (* 2 (PI)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ b (cos a))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ 1 (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/3 (/ 1 (cos a))) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 7))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (/ b (cos a))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/3 (/ 1 (cos a))) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/3 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* -1 (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* 3/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -3/2 (pow (cos a) 5)) (* (pow (cos a) 3) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 7))))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 2 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (/ b (pow (cos a) 2))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (/ 1 (pow (cos a) 2)) (/ (* b (sin a)) (pow (cos a) 3))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 5/6 (/ 1 (pow (cos a) 2))) (/ (pow (sin a) 2) (pow (cos a) 4))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 4))))) (* -1 (/ (sin a) (pow (cos a) 3))))) (/ 1 (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (+ (* 5/6 (/ 1 (pow (cos a) 2))) (/ (pow (sin a) 2) (pow (cos a) 4))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 4))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 3))) (/ (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 5)))))) (+ (* 5/6 (/ 1 (pow (cos a) 2))) (/ (pow (sin a) 2) (pow (cos a) 4)))) (* -1 (/ (pow (sin a) 2) (pow (cos a) 4))))) (* -1 (/ (sin a) (pow (cos a) 3))))) (/ 1 (pow (cos a) 2))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos a) (* (pow b 2) (- (* -2 (cos a)) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (* b (- (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2)))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (+ (cos a) (* (pow b 2) (- (+ (* -2 (cos a)) (* b (- (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (* b (- (* 5/3 (cos a)) (+ (* -3/2 (- (* -2 (cos a)) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (cos a))))) (+ (* 7/8 (cos a)) (+ (* 2 (/ (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (cos a))) (/ (pow (sin a) 4) (pow (cos a) 3)))))))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 2)))))) (+ (* -3/2 (cos a)) (/ (pow (sin a) 2) (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 (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (cos a)))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (cos a)))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (/ (cos a) b)))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (/ (+ (cos a) (* -1 (* b (sin a)))) b)))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (+ (* -1/2 a) (* 1/6 (* (pow a 2) b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (* -1/2 (* b b)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (* -1/6 (* b b)) #s(hole binary64 (* -1/6 (pow b 2))))
#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 (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (cos 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 (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (* 1/120 (* b b)) #s(hole binary64 (* 1/120 (pow b 2))))
#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 (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2))))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 1/24))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (+ 1/24 (* -1/720 (pow b 2)))))
#s(approx (* -1/720 (* b b)) #s(hole binary64 (* -1/720 (pow b 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 (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (+ (* -1 (* a b)) (* -1/2 (pow a 2)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (cos a)))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (pow b 3) #s(hole binary64 (pow b 3)))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (+ (* 1/4 (pow a 2)) (* a (* b (+ 1/6 (* -1/36 (pow a 2)))))) 1/2))))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (* 1/4 (pow a 2)) 1/2)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (- (+ (* 1/4 (pow a 2)) (* a (* b (+ 1/6 (* -1/36 (pow a 2)))))) 1/2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1/2 (pow a 2))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* a (* b (- (* 1/6 (pow a 2)) 1))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* 1/4 (* (pow a 2) b)) (* a (- (* 1/6 (pow a 2)) 1)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (+ (* -1/2 (pow a 2)) (* b (+ (* a (- (* 1/6 (pow a 2)) 1)) (* b (+ (* 1/4 (pow a 2)) (* a (* b (+ 1/6 (* -1/36 (pow a 2))))))))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1/2 a)))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* -1/2 a) (* b (- (+ (* 1/6 (pow a 2)) (* 1/4 (* a b))) 1)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (+ (* -1/2 a) (* b (- (+ (* 1/6 (pow a 2)) (* b (+ (* 1/4 a) (* b (+ 1/6 (* -1/36 (pow a 2))))))) 1)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 -1/2))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* 1/6 (* a b)) 1/2)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* b (+ (* 1/6 a) (* 1/4 b))) 1/2)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (- (* b (+ (* 1/6 a) (* b (+ 1/4 (* -1/36 (* a b)))))) 1/2)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* b (+ (* 1/6 a) (* 1/4 b)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* b (+ (* 1/6 a) (* b (+ 1/4 (* -1/36 (* a b))))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* 1/6 (* a b))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* b (+ (* -1/36 (* a (pow b 2))) (* 1/6 a)))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* 1/6 b)))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* b (+ 1/6 (* -1/36 (pow b 2))))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 1/6))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 (+ 1/6 (* -1/36 (pow b 2)))))
#s(approx (* -1/36 (* b b)) #s(hole binary64 (* -1/36 (pow b 2))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 -1))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 (- (* 1/6 (pow b 2)) 1)))
#s(approx (* 1/6 (* b b)) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* -1 (sin a))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (- (* -1/2 (* b (cos a))) (sin a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1/2 (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (+ (pow a -1) (pow b -1)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (/ (+ 1 (/ a b)) a) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (+ 1 (/ a b)) #s(hole binary64 (/ (+ a b) b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos a)))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (* -1 (exp (* (log b) 2))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (exp (* (log b) 2)) #s(hole binary64 (pow b 2)))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (log b))))
#s(approx (log b) #s(hole binary64 (log b)))
#s(approx (- a b) #s(hole binary64 (+ a (* -1 b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (* 1/2 (PI))) b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (/ (+ a (+ b (* 1/2 (PI)))) b)))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (* -1 (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (/ (+ b (* -1 (* a (- (* -1/2 (/ (PI) a)) 1)))) b)))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b)))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (/ (+ (* -1 b) (* a (- (* -1/2 (/ (PI) a)) 1))) b)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ (- (* -1/2 (/ (PI) a)) 1) b)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ (- (+ (* -1 (/ b a)) (* -1/2 (/ (PI) a))) 1) b)))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (* -1/2 (/ (PI) (* a b)))))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (/ (+ (* -1 (/ b a)) (* -1/2 (/ (PI) a))) b)))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (* 1/2 (/ (PI) (* a b)))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (/ (+ (* 1/2 (/ (PI) a)) (/ b a)) b)))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 (/ (+ b (* 1/2 (PI))) b)))
#s(approx (* 1/2 (/ (PI) b)) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (/ (PI) b) #s(hole binary64 (/ (PI) b)))
#s(approx (pow b -1) #s(hole binary64 (/ 1 b)))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* 1/2 (/ 1 (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (pow (cos (+ a (* 1/2 (PI)))) 2) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* 1/6 (/ 1 (sin (+ a (* 1/2 (PI))))))))) (/ (cos (+ a (* 1/2 (PI)))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ 1 (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (+ (* -1 (pow b 2)) (pow a 2))))
#s(approx (* -1 (* b b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* b r) (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (* b (+ (* 1/2 (/ (* b (* r (- (sin a) (sin (neg a))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (+ (* -1/4 (/ (* r (pow (- (sin a) (sin (neg a))) 2)) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (/ (* r (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (* -1/2 (/ (* r (- (sin a) (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/2 (/ (* r (- (* -1/6 (sin a)) (* -1/6 (sin (neg a))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/2 (/ (* (- (sin a) (sin (neg a))) (- (* -1/6 (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (+ (* -1/4 (/ (* r (pow (- (sin a) (sin (neg a))) 2)) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (/ (* r (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (* 1/2 (/ (* r (* (- (sin a) (sin (neg a))) (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))))))) (* -1/6 (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a))))))) (+ (* -1/4 (/ (* r (pow (- (sin a) (sin (neg a))) 2)) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (/ (* r (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (* -1/2 (/ (* r (- (sin a) (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ r (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ b (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (* b (+ (* 1/2 (/ (* b (- (sin a) (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/2 (/ (cos a) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/4 (/ (pow (- (sin a) (sin (neg a))) 2) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (* 1/6 (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))) (* -1/2 (/ (- (sin a) (sin (neg a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/2 (/ (* (- (sin a) (sin (neg a))) (- (* 1/2 (/ (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/2 (/ (cos a) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/4 (/ (pow (- (sin a) (sin (neg a))) 2) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (* 1/6 (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))) (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))) (+ (* -1/2 (/ (- (* -1/6 (sin a)) (* -1/6 (sin (neg a)))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (* 1/2 (/ (* (- (sin a) (sin (neg a))) (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))))))) (* 1/2 (/ (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2)))) (+ (* -1/2 (/ (cos a) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))) (+ (* -1/4 (/ (pow (- (sin a) (sin (neg a))) 2) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 3))) (* 1/6 (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))) (* -1/2 (/ (- (sin a) (sin (neg a))) (pow (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))) 2))))) (/ 1 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (cos a) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (+ (cos a) (* -1/2 (* b (- (sin a) (sin (neg a)))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (+ (cos a) (* b (- (* b (- (* -1/2 (cos a)) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (* 1/2 (- (sin a) (sin (neg a))))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (+ (cos a) (* b (- (* b (- (+ (* -1/2 (cos a)) (* -1/2 (* b (- (* -1/6 (sin a)) (* -1/6 (sin (neg a))))))) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))) (* 1/2 (- (sin a) (sin (neg a))))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (neg a)) (cos a)))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (+ (* 1/2 (* b (- (sin a) (sin (neg a))))) (* 1/2 (- (cos (neg a)) (cos a))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (+ (* 1/2 (- (cos (neg a)) (cos a))) (* b (+ (* 1/2 (* b (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))))) (* 1/2 (- (sin a) (sin (neg a)))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (+ (* 1/2 (- (cos (neg a)) (cos a))) (* b (+ (* 1/2 (- (sin a) (sin (neg a)))) (* b (+ (* 1/2 (* b (- (* -1/6 (sin a)) (* -1/6 (sin (neg a)))))) (* 1/2 (- (* -1/2 (cos (neg a))) (* -1/2 (cos a)))))))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (neg a)) (cos a))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (+ (cos (neg a)) (* b (- (sin a) (sin (neg a))))) (cos a))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (+ (cos (neg a)) (* b (- (+ (sin a) (* b (- (* -1/2 (cos (neg a))) (* -1/2 (cos a))))) (sin (neg a))))) (cos a))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (+ (cos (neg a)) (* b (- (+ (sin a) (* b (- (+ (* -1/2 (cos (neg a))) (* b (- (* -1/6 (sin a)) (* -1/6 (sin (neg a)))))) (* -1/2 (cos a))))) (sin (neg a))))) (cos a))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (neg a))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos (neg a)) (* -1 (* b (sin (neg a)))))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos (neg a)) (* b (- (* -1/2 (* b (cos (neg a)))) (sin (neg a)))))))
#s(approx (cos (- b a)) #s(hole binary64 (+ (cos (neg a)) (* b (- (* b (+ (* -1/2 (cos (neg a))) (* 1/6 (* b (sin (neg a)))))) (sin (neg a)))))))
#s(approx (- b a) #s(hole binary64 (- b a)))
#s(approx (cos (+ b a)) #s(hole binary64 (cos a)))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ b a)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* b (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (* -1 (cos (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (+ (* -1 b) (* 1/2 (PI)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (- (* 1/24 (pow b 2)) 1/2)))
#s(approx (* 1/24 (* b b)) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 1))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (+ 1 (* -1/6 (pow b 2)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (- (* 1/120 (pow b 2)) 1/6)))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6)))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2))))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 1/120))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 (+ 1/120 (* -1/5040 (pow b 2)))))
#s(approx (* -1/5040 (* b b)) #s(hole binary64 (* -1/5040 (pow b 2))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (* (cos a) (cos 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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3)) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* b (- (/ (* r (+ (* -1/6 (* (cos a) (sin a))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (cos a) 3)) (+ (* -3/2 (/ (* r (sin a)) (pow (cos a) 2))) (* -1 (/ (* r (pow (sin a) 3)) (pow (cos a) 4)))))) (/ (* r (+ (* -1 (pow (cos a) 2)) (+ (* -1/6 (pow (cos a) 2)) (pow (sin a) 2)))) (pow (cos a) 3))) (* -3/2 (/ r (cos a))))) (/ (* r (sin a)) (pow (cos a) 2)))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (* b (+ (* b (+ (* b (- (+ (* 1/2 (/ 1 (cos a))) (+ (* b (- (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* -1/3 (/ (sin a) (pow (cos a) 2)))) (+ (* -3/2 (/ (sin a) (pow (cos a) 2))) (* -1 (/ (pow (sin a) 3) (pow (cos a) 4)))))) (/ (pow (sin a) 2) (pow (cos a) 3)))) (* 1/6 (/ 1 (cos a))))) (/ (sin a) (pow (cos a) 2)))) (/ 1 (cos a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* b (- (* b (- (+ (* -3/2 (cos a)) (* b (- (* -1 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (pow (cos a) 2))) (+ (* -1/2 (sin a)) (+ (* -1/6 (sin a)) (/ (* (sin a) (- (* -3/2 (cos a)) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (cos a)))))))) (+ (* -1 (cos a)) (+ (* -1 (/ (pow (sin a) 2) (cos a))) (/ (pow (sin a) 2) (cos a)))))) (sin a))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (pow (cos a) 2)) (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2)))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (cos a)))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #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)) 2) (* (sin a) (sin b)))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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) (cos b)) 3) (* (pow (* (sin a) (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 (* (sin a) (sin b)) 2) (* (sin a) (sin b))) #s(hole binary64 (* (pow b 3) (pow (sin a) 3))))
#s(approx (* (pow (* (sin a) (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) (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) (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) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (pow (sin a) 2)) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (+ (* b (+ (* -1/3 (* b (pow (sin a) 2))) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 2))) (* (cos a) (sin a))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (* (cos a) (sin a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) #s(hole binary64 (* b (+ (* (cos a) (sin a)) (* (pow b 2) (+ (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* (pow b 2) (+ (* (cos a) (+ (* 1/120 (sin a)) (+ (* 1/24 (sin a)) (* 1/12 (sin a))))) (* (pow b 2) (* (cos a) (+ (* -1/144 (sin a)) (+ (* -1/240 (sin a)) (+ (* -1/720 (sin a)) (* -1/5040 (sin a)))))))))))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (/ (* r (+ (* -3 (pow (cos a) 10)) (+ (* -1/6 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))))))) (pow (cos a) 11)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 12))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* b (- (/ (* r (+ (* -2 (* (pow (cos a) 7) (pow (sin a) 3))) (* (pow (cos a) 7) (pow (sin a) 3)))) (pow (cos a) 11)) (+ (* -1 (/ (* (sin a) (- (/ (* r (+ (* -3 (pow (cos a) 10)) (+ (* -1/6 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))))))) (pow (cos a) 11)) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 12))))) (cos a))) (+ (/ (* r (* (sin a) (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2)))))) (pow (cos a) 13)) (/ (* r (+ (* -1 (* (pow (cos a) 10) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (* 9/2 (* (pow (cos a) 10) (sin a))))) (pow (cos a) 12)))))) (/ (* r (+ (* -3 (pow (cos a) 10)) (+ (* -1/6 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2))))))) (pow (cos a) 11))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (/ (* r (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 12))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 7/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 19/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* 7/2 (/ 1 (cos a))) (* b (- (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 4))) (/ (pow (sin a) 3) (pow (cos a) 4))) (+ (* -1 (/ (* (sin a) (- (* 7/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 19/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1 (/ (+ (* -1/2 (sin a)) (* -1/6 (sin a))) (pow (cos a) 2))) (+ (* 9/2 (/ (sin a) (pow (cos a) 2))) (/ (* (sin a) (+ (* -9/2 (pow (cos a) 11)) (* (pow (cos a) 9) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))))) (pow (cos a) 13)))))))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 19/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (cos a)))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -9/2 (cos a)) (* -1 (cos a))) (+ (* -3 (cos a)) (* -2 (cos a))))))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (- (+ (* -9/2 (cos a)) (+ (* -1 (cos a)) (* b (- (+ (* -1 (+ (* -1/2 (sin a)) (* -1/6 (sin a)))) (* 9/2 (sin a))) (+ (* -2 (/ (pow (sin a) 3) (pow (cos a) 2))) (+ (* -1 (/ (* (sin a) (+ (* -3 (pow (cos a) 10)) (* (pow (cos a) 6) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))))) (pow (cos a) 10))) (/ (pow (sin a) 3) (pow (cos a) 2)))))))) (+ (* -3 (cos a)) (* -2 (cos a))))))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (pow (cos a) 3)))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow b 2) (- (* -9/2 (pow (cos a) 3)) (* -3 (pow (cos a) 3)))) (pow (cos a) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -9/2 (pow (cos a) 3)) (* -1 (* b (pow (sin a) 3)))) (* -3 (pow (cos a) 3)))) (pow (cos a) 3))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -9/2 (pow (cos a) 3)) (* b (- (* b (- (* 75/8 (pow (cos a) 3)) (+ (* -3 (- (* -9/2 (pow (cos a) 3)) (* -3 (pow (cos a) 3)))) (* 4 (pow (cos a) 3))))) (pow (sin a) 3)))) (* -3 (pow (cos a) 3)))) (pow (cos a) 3))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (pow (cos a) 9)))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* -9/2 (* (pow b 2) (pow (cos a) 9))) (pow (cos a) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* 75/8 (* (pow b 2) (pow (cos a) 9))))) (pow (cos a) 9))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* (pow b 2) (+ (* -961/80 (* (pow b 2) (pow (cos a) 9))) (* 75/8 (pow (cos a) 9)))))) (pow (cos a) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (pow (cos a) 9)))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* -9/2 (* (pow b 2) (pow (cos a) 9))) (pow (cos a) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* 75/8 (* (pow b 2) (pow (cos a) 9))))) (pow (cos a) 9))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) #s(hole binary64 (+ (* (pow b 2) (+ (* -9/2 (pow (cos a) 9)) (* (pow b 2) (+ (* -961/80 (* (pow b 2) (pow (cos a) 9))) (* 75/8 (pow (cos a) 9)))))) (pow (cos a) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (pow (sin a) 9))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (+ (* -3/2 (* (pow b 2) (pow (sin a) 9))) (pow (sin a) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (+ (* (pow b 2) (+ (* -3/2 (pow (sin a) 9)) (* 43/40 (* (pow b 2) (pow (sin a) 9))))) (pow (sin a) 9)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) #s(hole binary64 (* (pow b 9) (+ (* (pow b 2) (+ (* -3/2 (pow (sin a) 9)) (* (pow b 2) (+ (* -2473/5040 (* (pow b 2) (pow (sin a) 9))) (* 43/40 (pow (sin a) 9)))))) (pow (sin a) 9)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (pow (cos a) 6)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* -3 (* (pow b 2) (pow (cos a) 6))) (pow (cos a) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (* (pow (cos a) 3) (pow (sin a) 3))))) (pow (cos a) 6))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) #s(hole binary64 (+ (* (pow b 2) (+ (* -3 (pow (cos a) 6)) (* b (+ (* 4 (* b (pow (cos a) 6))) (* (pow (cos a) 3) (pow (sin a) 3)))))) (pow (cos a) 6))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* b (pow (sin a) 6)) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* b (+ (* b (* (pow (cos a) 3) (+ (* 13/120 (pow (sin a) 3)) (+ (* 3/4 (pow (sin a) 3)) (* 7/8 (pow (sin a) 3)))))) (pow (sin a) 6))) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (* (pow (cos a) 3) (pow (sin a) 3)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* 13/120 (pow (sin a) 3)) (+ (* 3/4 (pow (sin a) 3)) (* 7/8 (pow (sin a) 3)))))) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) #s(hole binary64 (* (pow b 3) (+ (* (pow b 2) (+ (* (pow b 2) (+ (* (pow b 2) (* (pow (cos a) 3) (+ (* -7/16 (pow (sin a) 3)) (+ (* -61/240 (pow (sin a) 3)) (+ (* -13/80 (pow (sin a) 3)) (* -41/3024 (pow (sin a) 3))))))) (* (pow (cos a) 3) (+ (* 13/120 (pow (sin a) 3)) (+ (* 3/4 (pow (sin a) 3)) (* 7/8 (pow (sin a) 3))))))) (* (pow (cos a) 3) (+ (* -3/2 (pow (sin a) 3)) (* -1/2 (pow (sin a) 3)))))) (* (pow (cos a) 3) (pow (sin a) 3))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (* (cos a) (sin a))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -2 (pow (cos a) 2)) (* b (- (* -2 (/ (pow (sin a) 3) (cos a))) (+ (* -1 (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a))))) (+ (* -1 (/ (* (sin a) (- (* -2 (pow (cos a) 2)) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (cos a))) (/ (* (sin a) (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (cos a))))))) (+ (* -1 (pow (cos a) 2)) (* -1 (pow (sin a) 2))))) (* -1 (* (cos a) (sin a))))) (pow (cos a) 2))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (pow (cos a) 4)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (* -2 (pow (cos a) 4)) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (* b (* (cos a) (pow (sin a) 3)))) (* -2 (pow (cos a) 4))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* -2 (pow (cos a) 4)) (* b (- (* b (- (* 5/3 (pow (cos a) 4)) (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4)))) (* 2 (* (cos a) (pow (sin a) 3)))))) (* (pow (cos a) 2) (pow (sin a) 2)))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (pow (cos a) 4)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (cos a) 4))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* 5/3 (* (pow b 2) (pow (cos a) 4))))) (pow (cos a) 4))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow (cos a) 4)) (* (pow b 2) (+ (* -34/45 (* (pow b 2) (pow (cos a) 4))) (* 5/3 (pow (cos a) 4)))))) (pow (cos a) 4))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (* (pow (cos a) 2) (pow (sin a) 2)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* b (* (cos a) (pow (sin a) 3)))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (pow (sin a) 4))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (* (pow b 2) (+ (* b (+ (* 2 (* (cos a) (pow (sin a) 3))) (* b (+ (* 2 (* (pow (cos a) 2) (* (sin a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (+ (* b (+ (* -2/3 (* (cos a) (pow (sin a) 3))) (* 2 (* (cos a) (* (pow (sin a) 2) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))))) (pow (sin a) 4)))))) (* (pow (cos a) 2) (pow (sin a) 2))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (pow (cos a) 2)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* -1 (* b (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (* -1 (pow (cos a) 2)) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(hole binary64 (+ (* b (- (* b (- (+ (* -1 (* b (* (cos a) (+ (* -1/2 (sin a)) (* -1/6 (sin a)))))) (* -1 (pow (cos a) 2))) (pow (sin a) 2))) (* (cos a) (sin a)))) (pow (cos a) 2))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (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 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (+ 1 (* 1/6 (pow b 2)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (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 (/ 1 (sin b))) #s(hole binary64 b))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (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) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* b r) (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))) (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))) (+ (* -1 (/ (* r (pow (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) 2)) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))) (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (+ (/ (* r (- (* 1/6 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1/6 (sin a)))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)) (/ (* (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) (- (* -1/6 (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))) (+ (* -1 (/ (* r (pow (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) 2)) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a))))))))) (* -1/6 (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a))))))) (+ (* -1 (/ (* r (pow (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a)) 2)) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 3))) (/ (* r (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2))))) (/ (* r (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a))) (pow (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))) 2)))) (/ r (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a)))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (* (cos (* 1/2 (PI))) (sin (neg a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (+ (* b (- (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (sin a))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (+ (* b (- (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* b (+ (* -1/2 (cos a)) (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a))))))) (sin a))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos a) (+ (* b (- (+ (* -1 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* b (+ (* -1/2 (cos a)) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin (neg a)))) (* b (- (* 1/6 (* (cos (neg a)) (cos (* 1/2 (PI))))) (* -1/6 (sin a)))))))) (sin a))) (* (cos (* 1/2 (PI))) (sin (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (neg a))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* -1 (* b (cos (neg a)))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* -1/2 (* b (sin (neg a)))))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (+ (sin (neg a)) (* b (+ (* -1 (cos (neg a))) (* b (+ (* -1/2 (sin (neg a))) (* 1/6 (* b (cos (neg a)))))))))))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) a)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos a)))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) #s(hole binary64 (* (pow b 2) (+ r (/ r (* a b))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* b (+ (* a r) (/ r b)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (/ (* b (* r (sin a))) (pow (cos a) 2))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) #s(hole binary64 (/ (* r (sin a)) (pow (cos a) 2))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 b))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 b))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (pow (cos b) 2) #s(hole binary64 (pow (cos b) 2)))
#s(approx (pow (cos b) 3) #s(hole binary64 (pow (cos b) 3)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (+ b (PI))) (cos (+ b (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) b)))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (+ b (* 2 (PI)))) (cos (+ b (* 2 (PI)))))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 b))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (* b (+ 1 (* 2 (/ (PI) b))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (/ (* (pow b 2) (sin a)) (pow (cos a) 2))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) #s(hole binary64 (* (pow b 2) (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (/ (* b (sin a)) (pow (cos a) 2))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (pow (cos a) 2))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* b (+ a (/ 1 b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) #s(hole binary64 (* -1 (sin a))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* b (+ (* -1 a) (/ 1 b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* a (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* b (+ (* -1/2 (/ (pow a 2) b)) (+ (* a (- (* 1/6 (pow a 2)) 1)) (/ 1 b))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* a (* b (- (* 1/6 (pow a 2)) 1)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* b (+ (* -1/2 (/ (pow a 2) b)) (* a (- (* 1/6 (pow a 2)) 1))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* b (- (* 1/6 (pow a 2)) 1))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* b (- (+ (* -1/2 (/ a b)) (* 1/6 (pow a 2))) 1))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ a b)) (* 1/6 (pow a 2))))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* b (- (* 1/6 a) (* 1/2 (/ 1 b))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (cos a)) (/ (cos a) (pow b 2))) (/ (sin a) b)))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* -1/2 (pow b 2))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/2))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* -1/2 (* (pow b 2) (cos a)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1/2 (* b (cos a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* b (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (/ (cos a) b)))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* 1/120 (pow b 5))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* (pow b 5) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* (pow b 5) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(hole binary64 (* (pow b 4) (- (+ 1/120 (/ 1 (pow b 4))) (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* 1/120 (pow b 4))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) #s(hole binary64 (* (pow b 4) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* 1/120 (pow b 2))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(hole binary64 (* (pow b 2) (- 1/120 (* 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(hole binary64 (* (pow b 6) (- (+ (* 1/24 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* -1/720 (pow b 6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) #s(hole binary64 (* (pow b 6) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) (+ 1/720 (/ 1/2 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* -1/720 (pow b 4))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) #s(hole binary64 (* (pow b 4) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* -1/720 (pow b 2))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/24 (/ 1 (pow b 2))) 1/720))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1/6 (pow b 3))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* -1/6 (pow b 2))))
#s(approx (+ (* (* b b) -1/6) 1) #s(hole binary64 (* (pow b 2) (- (/ 1 (pow b 2)) 1/6))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* -1 (* a b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* b (+ (* -1 a) (+ (* -1/2 (/ (pow a 2) b)) (/ 1 b))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* b (+ (* -1 a) (* -1/2 (/ (pow a 2) b))))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* b (- (* -1/2 (/ a b)) 1))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (cos a) b)) (+ (* 1/6 (sin a)) (/ (cos a) (pow b 3)))) (/ (sin a) (pow b 2))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* a (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (* a (+ 1/6 (* -1/36 (pow a 2))))) (* 1/2 (/ 1 b))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))) (* 1/2 (/ 1 b))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (pow a 2) (pow b 3))) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (+ (/ 1 (pow b 3)) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))))) (* 1/2 (/ 1 b))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* a (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (* a (+ 1/6 (* -1/36 (pow a 2))))) (* 1/2 (/ 1 b))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow b 3) (- (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))) (* 1/2 (/ 1 b))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* (pow b 3) (- (+ (* -1/2 (/ (pow a 2) (pow b 3))) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2))))) (* 1/2 (/ 1 b))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* a (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow b 3) (+ (* 1/4 (/ (pow a 2) b)) (* a (+ 1/6 (* -1/36 (pow a 2))))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow b 3) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (pow a 2) (pow b 3))) (+ (* 1/4 (/ (pow a 2) b)) (+ (* a (+ 1/6 (* -1/36 (pow a 2)))) (/ (* a (- (* 1/6 (pow a 2)) 1)) (pow b 2))))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (+ 1/6 (* -1/36 (pow a 2))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (+ 1/6 (+ (* -1/36 (pow a 2)) (* 1/4 (/ a b)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (- (+ 1/6 (+ (* -1/36 (pow a 2)) (+ (* 1/6 (/ (pow a 2) (pow b 2))) (* 1/4 (/ a b))))) (/ 1 (pow b 2))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* (pow b 3) (- (+ 1/6 (+ (* -1/2 (/ a (pow b 3))) (+ (* -1/36 (pow a 2)) (+ (* 1/6 (/ (pow a 2) (pow b 2))) (* 1/4 (/ a b)))))) (/ 1 (pow b 2))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1/36 (* a (pow b 3)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (* 1/4 (/ 1 b))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (+ (* 1/6 (/ a (pow b 2))) (* 1/4 (/ 1 b)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* (pow b 3) (- (+ (* -1/36 a) (+ (* 1/6 (/ a (pow b 2))) (* 1/4 (/ 1 b)))) (* 1/2 (/ 1 (pow b 3)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1/36 (* a (pow b 3)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (* 1/4 (/ 1 b))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (+ (* 1/6 (/ a (pow b 2))) (* 1/4 (/ 1 b)))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* -1/36 (* a (pow b 3)))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* (pow b 3) (+ (* -1/36 a) (* 1/6 (/ a (pow b 2)))))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* -1/36 (pow b 3))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* (pow b 3) (- (* 1/6 (/ 1 (pow b 2))) 1/36))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 (* -1/36 (pow b 2))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/6 (/ 1 (pow b 2))) 1/36))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* 1/6 (pow b 3))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* (pow b 3) (- 1/6 (/ 1 (pow b 2))))))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (- (* 1/6 (* b b)) 1) #s(hole binary64 (* (pow b 2) (- 1/6 (/ 1 (pow b 2))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* 1/6 (* (pow b 3) (sin a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* (pow b 3) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (sin a) (pow b 2))) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a)))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* 1/6 (* (pow b 2) (sin a)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* 1/6 (* b (sin a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* b (+ (* -1/2 (/ (cos a) b)) (* 1/6 (sin a))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (* b b)) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (* (log b) 2) #s(hole binary64 (* -2 (log (/ 1 b)))))
#s(approx (log b) #s(hole binary64 (* -1 (log (/ 1 b)))))
#s(approx (- a b) #s(hole binary64 (* b (- (/ a b) 1))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 b))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 1))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 1))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (* -1 (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 -1))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (- (/ (* a (- (* -1/2 (/ (PI) a)) 1)) b) 1)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (/ -1 a)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (- (* -1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (/ -1 a)))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) #s(hole binary64 (- (* -1/2 (/ (PI) (* a b))) (/ 1 a))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) #s(hole binary64 (+ (* 1/2 (/ (PI) (* a b))) (/ 1 a))))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 1))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(hole binary64 (+ 1 (* 1/2 (/ (PI) b)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* -1 (/ (pow a 2) (pow b 2))) (+ (* 1/2 (/ (PI) b)) (+ (/ a b) (/ (pow a 2) (pow b 2)))))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (* a a) (exp (* (log b) 2))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (pow b 2)) 1))))
#s(approx (- b a) #s(hole binary64 (* b (+ 1 (* -1 (/ a b))))))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) 1))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(hole binary64 (* (pow b 4) (- (+ 1/24 (/ 1 (pow b 4))) (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* 1/24 (pow b 4))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) #s(hole binary64 (* (pow b 4) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* 1/24 (pow b 2))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(hole binary64 (* (pow b 2) (- 1/24 (* 1/2 (/ 1 (pow b 2)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1/5040 (pow b 7))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* (pow b 7) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* (pow b 7) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* (pow b 7) (- (+ (* 1/120 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* -1/5040 (pow b 6))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(hole binary64 (* (pow b 6) (- (+ (* 1/120 (/ 1 (pow b 2))) (/ 1 (pow b 6))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* -1/5040 (pow b 6))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) #s(hole binary64 (* (pow b 6) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (* -1/5040 (pow b 4))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (* (pow b 4) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(hole binary64 (* (pow b 4) (- (* 1/120 (/ 1 (pow b 2))) (+ 1/5040 (/ 1/6 (pow b 4)))))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* -1/5040 (pow b 4))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) #s(hole binary64 (* (pow b 4) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 (* -1/5040 (pow b 2))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(hole binary64 (* (pow b 2) (- (* 1/120 (/ 1 (pow b 2))) 1/5040))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* 1/6 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) #s(hole binary64 (* b (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* 1/6 (pow b 2))))
#s(approx (+ 1 (* 1/6 (* b b))) #s(hole binary64 (* (pow b 2) (+ 1/6 (/ 1 (pow b 2))))))
#s(approx (/ 1 (/ 1 (sin b))) #s(hole binary64 (sin b)))
#s(approx (/ 1 (sin b)) #s(hole binary64 (/ 1 (sin b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (+ r (* a (* b r))) #s(hole binary64 (* -1 (* b (+ (* -1 (* a r)) (* -1 (/ r b)))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ a (+ b (* 1/2 (PI)))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (* -1 b))))))
#s(approx (sin (+ b (* 1/2 (PI)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (+ b (* 1/2 (PI))) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) #s(hole binary64 (* -1 (* b (- (* -1/2 (pow a 2)) 1)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (- (PI) (* -1 b))) (cos (- (PI) (* -1 b))))))
#s(approx (+ b (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (- (* 2 (PI)) (* -1 b))) (cos (- (* 2 (PI)) (* -1 b))))))
#s(approx (+ (+ b (PI)) (PI)) #s(hole binary64 (* -1 (* b (- (* -2 (/ (PI) b)) 1)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (pow (cos a) 2))) (/ 1 (* b (cos a))))))))
#s(approx (+ 1 (* a b)) #s(hole binary64 (* -1 (* b (- (* -1 a) (/ 1 b))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (+ 1 (* -1 (* a b))) #s(hole binary64 (* -1 (* b (- a (/ 1 b))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* a (* b (+ 1 (* -1/6 (pow a 2))))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ (+ 1 (* -1/2 (pow a 2))) b)) (* a (+ 1 (* -1/6 (pow a 2)))))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* a (* b (+ 1 (* -1/6 (pow a 2))))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/2 (/ (pow a 2) b)) (* a (+ 1 (* -1/6 (pow a 2)))))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1 (* b (+ 1 (* -1/6 (pow a 2)))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -1/6 (pow a 2)) (* 1/2 (/ a b))))))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/6 (pow a 2)) (* 1/2 (/ a b)))))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/6 a) (* 1/2 (/ 1 b)))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) #s(hole binary64 (* -1 (* b (+ (* 1/2 (cos a)) (/ (sin a) b))))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(hole binary64 (* -1 (* b (+ (sin a) (* -1 (/ (cos a) b)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) 1/120)))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) #s(hole binary64 (* -1 (* (pow b 5) (- (* 1/6 (/ 1 (pow b 2))) (+ 1/120 (/ 1 (pow b 4))))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) #s(hole binary64 (* -1 (* (pow b 3) (- 1/6 (/ 1 (pow b 2)))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(hole binary64 (* -1 (* b (+ a (* -1 (/ (+ 1 (* -1/2 (pow a 2))) b)))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) #s(hole binary64 (* -1 (* b (+ a (* 1/2 (/ (pow a 2) b)))))))
#s(approx (+ (* -1 b) (* -1/2 a)) #s(hole binary64 (* -1 (* b (+ 1 (* 1/2 (/ a b)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (sin a) (* -1 (/ (cos a) b))) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* a (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (* 1/4 (pow a 2)) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* a (+ 1 (* -1/6 (pow a 2)))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* -1/2 (pow a 2))) b)) (* a (+ 1 (* -1/6 (pow a 2))))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* a (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (* 1/4 (pow a 2)) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* a (+ 1 (* -1/6 (pow a 2)))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (/ (pow a 2) b)) (* a (+ 1 (* -1/6 (pow a 2))))) b)) (* 1/4 (pow a 2))) 1/2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* a (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/4 (/ (pow a 2) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (* a (+ 1 (* -1/6 (pow a 2)))) b)) (* 1/4 (pow a 2))) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (pow a 2) b)) (* a (+ 1 (* -1/6 (pow a 2))))) b)) (* 1/4 (pow a 2))) b)) (* a (- (* 1/36 (pow a 2)) 1/6)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (* 1/36 (pow a 2)) 1/6)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1/4 (/ a b)) (* 1/36 (pow a 2))) 1/6)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* -1/6 (pow a 2))) b)) (* 1/4 a)) b)) (* 1/36 (pow a 2))) 1/6)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) #s(hole binary64 (* -1 (* (pow b 3) (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1/6 (pow a 2)) (* 1/2 (/ a b)))) b)) (* 1/4 a)) b)) (* 1/36 (pow a 2))) 1/6)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* (pow b 3) (- (* 1/36 a) (* 1/4 (/ 1 b)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ 1/4 (* 1/6 (/ a b))) b)) (* 1/36 a))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ 1/4 (* -1 (/ (+ (* -1/6 a) (* 1/2 (/ 1 b))) b))) b)) (* 1/36 a))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1 (* (pow b 3) (- (* 1/36 a) (* 1/4 (/ 1 b)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ 1/4 (* 1/6 (/ a b))) b)) (* 1/36 a))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (/ a (pow b 2))) (* 1/36 a))))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) #s(hole binary64 (* -1 (* (pow b 3) (- 1/36 (* 1/6 (/ 1 (pow b 2))))))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) #s(hole binary64 (* -1 (* (pow b 3) (- (/ 1 (pow b 2)) 1/6)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) #s(hole binary64 (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (sin a) b)) (* -1/2 (cos a))) b)) (* -1/6 (sin a)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (* 1/2 (cos a)) (/ (sin a) b)) b)) (* 1/6 (sin a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(hole binary64 (* -1 (* b (+ (* -1/6 (sin a)) (* 1/2 (/ (cos a) b)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) #s(hole binary64 (/ (* r (sin b)) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) #s(hole binary64 (/ (sin b) (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) #s(hole binary64 (cos (/ (- (pow a 2) (pow b 2)) (+ a (* -1 b))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (log b) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 b)))))))
#s(approx (log b) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 b))))))
#s(approx (- a b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ a b)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) #s(hole binary64 (* -1 (* b (- (+ (* -1 (/ a b)) (* -1/2 (/ (PI) b))) 1)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 a) (* -1/2 (PI))) b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(hole binary64 (+ 1 (/ (* a (+ 1 (* 1/2 (/ (PI) a)))) b))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(hole binary64 (- (* -1 (/ (* a (+ 1 (* 1/2 (/ (PI) a)))) b)) 1)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) #s(hole binary64 (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) a))) b)) (/ 1 a))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (+ a (* -1 b)))) (/ (pow b 2) (+ a (* -1 b))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (+ a (* -1 b)))) (/ (pow b 2) (+ a (* -1 b))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* 1/2 (PI)) (/ (pow a 2) (+ a (* -1 b)))) (/ (pow b 2) (+ a (* -1 b)))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (+ (* -1 (/ (+ (* -1 (pow a 2)) (pow a 2)) b)) (* 1/2 (PI)))) b)) 1)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b)))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b)))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) #s(hole binary64 (- (* (cos a) (cos b)) (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) #s(hole binary64 (* 1/2 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b)))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) #s(hole binary64 (- (cos (neg (+ a (* -1 b)))) (cos (- a (* -1 b))))))
#s(approx (cos (- b a)) #s(hole binary64 (cos (neg (+ a (* -1 b))))))
#s(approx (- b a) #s(hole binary64 (* -1 (* b (- (/ a b) 1)))))
#s(approx (cos (+ b a)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (sin (+ b (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (+ b (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 b) (* 1/2 (PI))))))
#s(approx (+ (neg b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1/2 (/ (PI) b)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1 (* (pow b 7) (- 1/5040 (* 1/120 (/ 1 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1 (* (pow b 7) (- (+ 1/5040 (/ 1/6 (pow b 4))) (* 1/120 (/ 1 (pow b 2))))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) #s(hole binary64 (* -1 (* (pow b 7) (- (+ 1/5040 (/ 1/6 (pow b 4))) (+ (* 1/120 (/ 1 (pow b 2))) (/ 1 (pow b 6))))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) #s(hole binary64 (/ (* r (sin b)) (+ (cos (- a (* -1 b))) (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) #s(hole binary64 (+ (cos (- a (* -1 b))) (* (cos (* 1/2 (PI))) (sin (- (* -1 b) a))))))
#s(approx (sin (neg (+ a b))) #s(hole binary64 (sin (- (* -1 b) a))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* (cos (+ a b)) 1) #s(hole binary64 (cos (- a (* -1 b)))))
Outputs
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))
(*.f64 a (*.f64 (*.f64 b b) r))
a
(*.f64 (*.f64 b b) r)
(*.f64 b b)
b
r
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))
(*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))
(fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))
(+.f64 (*.f64 (*.f64 b b) r) (/.f64 (*.f64 b r) a))
(/.f64 (*.f64 b r) a)
(*.f64 b r)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))
(*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b)))
(fma.f64 a r (/.f64 r b))
(+.f64 (*.f64 a r) (/.f64 r b))
(/.f64 r b)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
#s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))
(*.f64 #s(literal -1/2 binary64) (*.f64 a a))
#s(literal -1/2 binary64)
(*.f64 a a)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))))))
(/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))
#s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
(*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64)))
#s(literal -1/720 binary64)
(pow.f64 a #s(literal 6 binary64))
#s(literal 6 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
(*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))))
(/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 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) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a))))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))
(*.f64 #s(literal -1/720 binary64) (*.f64 a a))
#s(literal 1/2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r))))
#s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))
(*.f64 a (*.f64 b r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))))
(*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
(*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))))
(*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))
(/.f64 r (*.f64 b (cos.f64 a)))
(*.f64 b (cos.f64 a))
(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 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
(*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
#s(literal 2 binary64)
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 b)
#s(literal 3 binary64)
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(sin.f64 a)
(sin.f64 b)
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a)))
(*.f64 r (sin.f64 b))
(sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))
#s(approx (+ a (+ b (* 1/2 (PI)))) 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)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b)))
(sin.f64 #s(approx (+ b (* 1/2 (PI))) b))
#s(approx (+ b (* 1/2 (PI))) 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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (cos.f64 b) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.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)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.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)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.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)) (pow.f64 (*.f64 (sin.f64 a) (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)) (pow.f64 (*.f64 (sin.f64 a) (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
(*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))
(-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(pow.f64 (cos.f64 a) #s(literal 3 binary64))
(pow.f64 (cos.f64 b) #s(literal 3 binary64))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.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 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64)))
#s(approx (tan b) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))
(*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a)))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))
(/.f64 b a)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))
(*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
(/.f64 (sin.f64 b) (*.f64 a (cos.f64 b)))
(*.f64 a (cos.f64 b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))))
#s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))
(*.f64 (*.f64 a a) b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64))))
(tan.f64 #s(approx (+ b (PI)) (PI.f64)))
#s(approx (+ b (PI)) (PI.f64))
(PI.f64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(+.f64 (+.f64 b (PI.f64)) (PI.f64))
(+.f64 b (PI.f64))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b)))
#s(approx (+ 1 (* a b)) (*.f64 a b))
(*.f64 a b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
(*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a))))))
(/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))))))
(/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))
(*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a))))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))
(*.f64 #s(literal 1/24 binary64) (*.f64 a a))
#s(literal 1/24 binary64)
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.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 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))
#s(literal -1 binary64)
(*.f64 b (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
(*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))
(fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))
(+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 a)) (/.f64 (cos.f64 a) b))
(/.f64 (cos.f64 a) b)
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
(*.f64 #s(literal -1 binary64) (*.f64 a b))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/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)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))
(*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))
(*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/6 binary64) (*.f64 a b))
#s(literal 1/6 binary64)
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/2 binary64) (*.f64 b b))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))
(-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a))
(*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b))
#s(approx (* b (cos a)) b)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/6 binary64) (*.f64 b b))
#s(literal -1/6 binary64)
#s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#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))))))
(*.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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)))
(-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64))
(*.f64 #s(literal 1/120 binary64) (*.f64 b b))
#s(literal 1/120 binary64)
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/720 binary64) (*.f64 b b))
(*.f64 (sin.f64 b) (sin.f64 a))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))))
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)
(fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 b b) #s(literal -1/6 binary64)) #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)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
(+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))
(*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))
(fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))
(+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) a)
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (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)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
(*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))
(*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))
(pow.f64 b #s(literal 3 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b 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(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #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)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))))
(*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))
(fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))
(+.f64 (*.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))))
#s(literal 1/4 binary64)
(*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))
(*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/36 binary64) (*.f64 b b))
#s(literal -1/36 binary64)
(*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))
(*.f64 #s(literal 1/6 binary64) (*.f64 b b))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))
(+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a))))
(*.f64 b (-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))
(-.f64 (*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a))
(*.f64 b #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))))
(/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))
(*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)
#s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))))
(*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(/.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a))))
(cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))
#s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a))
(*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)
#s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))))
(*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))
#s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64)))
(pow.f64 a #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))))
(/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b))))
(cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))
(/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 (log.f64 b) #s(literal 2 binary64))
(log.f64 b)
(-.f64 a b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))))
(*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))))
(*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))
(*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64))))
(-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))
(/.f64 (PI.f64) b)
(pow.f64 b #s(literal -1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))))))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))))
(*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b)))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64)))
#s(approx (cos b) #s(literal 1 binary64))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a)))
(cos.f64 (-.f64 b a))
(-.f64 b a)
(cos.f64 (+.f64 b a))
(+.f64 b a)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 a)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 b)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a))))
(-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))
(*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b))))
(*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))
(*.f64 #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))))) (cos.f64 a))
#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)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 b b))
(*.f64 #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)))))) (sin.f64 a))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a))))
(-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))
(*.f64 #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)))))) (sin.f64 a))
#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))))))
(*.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)))))
(+.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))))
(*.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)))
(-.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))
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b))))
(+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)))
(*.f64 #s(literal -1/5040 binary64) (*.f64 b b))
#s(literal -1/5040 binary64)
(*.f64 r (/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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))))))
(/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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)))))
(/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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 (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (+ (* (* (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)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))
(fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))
(pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))
(fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(+.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(+.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 #s(approx (* (sin b) r) (*.f64 b r)) #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 (* (sin b) r) (*.f64 b r))
#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)))))
(+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
(/.f64 (*.f64 #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)))))) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 #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)))))) r)
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 (sin.f64 b) r)
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(sin.f64 (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
(+.f64 a b)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))
(cos.f64 (+.f64 a b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b (*.f64 r (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 r (+.f64 b (*.f64 a (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* a (* (* b b) r)) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))
#s(approx (* (* b b) r) (*.f64 (pow.f64 b #s(literal 2 binary64)) r))
#s(approx r r)
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 a (*.f64 r (+.f64 (/.f64 b a) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 r (+.f64 (/.f64 b a) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (/ (* b r) a) (/.f64 (*.f64 b r) a))
#s(approx (* b r) (*.f64 b r))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 r (+.f64 a (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (* a r) (/ r b)) (*.f64 r (+.f64 a (/.f64 #s(literal 1 binary64) b))))
#s(approx (/ r b) (/.f64 r b))
#s(approx (* b (/ r (cos a))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ r (cos a)) (/.f64 r (cos.f64 a)))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 r (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ r (* a (* b r))) (*.f64 r (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (* a (* b r)) (*.f64 a (*.f64 b r)))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 b (*.f64 r (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (*.f64 r (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ r (* b (cos a))) (/.f64 r (*.f64 b (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 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 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) (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) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/.f64 r (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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 b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (*.f64 r (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 a) (* b b)) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (-.f64 a b)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 a b))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 a b))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (*.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* (sin b) r) (*.f64 r (sin.f64 b)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 (+.f64 a b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 (+.f64 a b)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 b a) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 #s(literal -1 binary64) (*.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 b a) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) a) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (+ (* a r) (/ r b)) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) a) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (*.f64 #s(literal -1 binary64) (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a (*.f64 b r)) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 b r) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (*.f64 b r)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 b r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 b r))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (fma.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 b r)))
#s(approx a a)
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 b r))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (fma.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 b r)))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (fma.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 b r)) a))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 b r))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (fma.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 b r)))
#s(approx (+ (* a r) (/ r b)) (/.f64 r b))
#s(approx (+ (* a r) (/ r b)) (fma.f64 a r (/.f64 r b)))
#s(approx (* b (/ r (cos a))) (*.f64 b r))
#s(approx (* b (/ r (cos a))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b r)) (*.f64 b r)))
#s(approx (* b (/ r (cos a))) (fma.f64 b r (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (* b (/ r (cos a))) (fma.f64 b r (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 b r) (fma.f64 #s(literal 1/48 binary64) (*.f64 b r) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 b r) (*.f64 #s(literal 1/24 binary64) (*.f64 b r))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b r))))))
#s(approx (/ r (cos a)) r)
#s(approx (/ r (cos a)) (+.f64 r (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) r))))
#s(approx (/ r (cos a)) (+.f64 r (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (/ r (cos a)) (+.f64 r (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r))))))) (fma.f64 #s(literal -1/4 binary64) r (*.f64 #s(literal 1/24 binary64) r)))) (*.f64 #s(literal -1/2 binary64) r)))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* -1/2 (* a a))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* a a))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* -1/2 (* a a)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a a) (pow.f64 a #s(literal 2 binary64)))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* -1/720 (pow a 6)) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
#s(approx (pow a 6) (pow.f64 a #s(literal 6 binary64)))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (+ 1/24 (* -1/720 (* a a))) #s(literal 1/24 binary64))
#s(approx (+ 1/24 (* -1/720 (* a a))) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* -1/720 (* a a)) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) r)
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a r) (*.f64 b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b r)) (*.f64 #s(literal -1 binary64) (*.f64 b r)))) (*.f64 #s(literal -1/2 binary64) r)) (*.f64 b r)))))
#s(approx (+ r (* a (* b r))) r)
#s(approx (+ r (* a (* b r))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) r)
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.f64 r (*.f64 a (*.f64 b r))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.f64 r (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a r) (*.f64 b r)))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.f64 r (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) r (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))))) (*.f64 b r)))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (fma.f64 a r (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (fma.f64 a (+.f64 r (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a r) b))) (/.f64 r b)))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (fma.f64 a (+.f64 r (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) r) (*.f64 #s(literal -1 binary64) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 r b))))) (/.f64 r b)))
#s(approx (/ r (* b (cos a))) (/.f64 r b))
#s(approx (/ r (* b (cos a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) r) b) (/.f64 r b)))
#s(approx (/ r (* b (cos a))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 r b) (*.f64 #s(literal 1/24 binary64) (/.f64 r b))))) (*.f64 #s(literal -1/2 binary64) (/.f64 r b))) (/.f64 r b)))
#s(approx (/ r (* b (cos a))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 r b) (fma.f64 #s(literal 1/48 binary64) (/.f64 r b) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 r b) (*.f64 #s(literal 1/24 binary64) (/.f64 r b)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 r b) (*.f64 #s(literal 1/24 binary64) (/.f64 r b))))) (*.f64 #s(literal -1/2 binary64) (/.f64 r b))) (/.f64 r b)))
#s(approx (* b (cos a)) b)
#s(approx (* b (cos a)) (+.f64 b (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))
#s(approx (* b (cos a)) (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))))
#s(approx (* b (cos a)) (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 #s(literal 1/24 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 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* b (pow (cos a) 2)) b)
#s(approx (* b (pow (cos a) 2)) (+.f64 b (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))
#s(approx (* b (pow (cos a) 2)) (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))))
#s(approx (* b (pow (cos a) 2)) (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 #s(literal 1/3 binary64) b)))))))
#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) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (cos a) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin a) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 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 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 r (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 r (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (sin.f64 b))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 a (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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) (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) (sin b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (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) (sin b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (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 (pow.f64 a #s(literal 2 binary64)) (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)) (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 (pow.f64 a #s(literal 2 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) (pow (cos b) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 a #s(literal 2 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) (pow (cos b) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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) (sin b)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (cos a) 3) #s(literal 1 binary64))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 3/2 binary64)))))
#s(approx (pow (cos a) 3) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (pow.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)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (*.f64 #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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (*.f64 #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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/.f64 r (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (+.f64 (/.f64 r (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 a (*.f64 r (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin 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 4 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (/.f64 r (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (/.f64 (*.f64 (sin.f64 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 4 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))) (cos.f64 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 4 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (/.f64 r (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.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 (* (sin a) (sin b)) 2)) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (*.f64 a (fma.f64 a (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)))) (pow (* (sin a) (sin b)) 2)) (*.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 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (cos.f64 b) (sin.f64 b)))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 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 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (*.f64 #s(literal 7/8 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b)))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))) (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (*.f64 a (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))))) (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #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 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (*.f64 #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 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (fma.f64 #s(literal -2/3 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (+.f64 (/.f64 (sin.f64 b) (cos.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 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (+.f64 (/.f64 (sin.f64 b) (cos.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) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx (/ (sin b) (* a (cos b))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))
#s(approx (* a (cos b)) (*.f64 a (cos.f64 b)))
#s(approx (/ b (cos a)) b)
#s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b)))) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (/ b (cos a)) (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) b (fma.f64 #s(literal 1/48 binary64) b (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b))))))) (fma.f64 #s(literal -1/4 binary64) b (*.f64 #s(literal 1/24 binary64) b)))) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (+ b (* 1/2 (* (* a a) b))) b)
#s(approx (+ b (* 1/2 (* (* a a) b))) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))
#s(approx (* 1/2 (* (* a a) b)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))
#s(approx (* (* a a) b) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) b)
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 a b) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/2 binary64) b (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal -1 binary64) b))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(literal 1 binary64))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) a)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a (+.f64 b (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) b) (*.f64 #s(literal -1 binary64) b)))))))))
#s(approx (+ 1 (* a b)) #s(literal 1 binary64))
#s(approx (+ 1 (* a b)) (+.f64 #s(literal 1 binary64) (*.f64 a b)))
#s(approx (* a b) (*.f64 a b))
#s(approx (/ 1 (cos a)) #s(literal 1 binary64))
#s(approx (/ 1 (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ 1 (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 5/24 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ 1 (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 5/24 binary64) (*.f64 #s(literal 61/720 binary64) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* a a)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* a a)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* a a)) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (*.f64 #s(literal -2 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 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (sin.f64 b) (cos.f64 b))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (+.f64 (/.f64 (sin.f64 b) (cos.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)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (sin.f64 b) (cos.f64 b))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (*.f64 #s(literal -2 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 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 7 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #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 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))))) (*.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 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (+.f64 (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (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 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 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) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))) (cos.f64 b)) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 5 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (cos.f64 b)) (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 a (-.f64 (*.f64 #s(literal 5/3 binary64) (cos.f64 b)) (fma.f64 #s(literal -3/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (cos.f64 b)) (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))) (fma.f64 #s(literal 7/8 binary64) (cos.f64 b) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (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))))))) (/.f64 (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))))))) (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (* b (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (* -1 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))))
#s(approx (* -1 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 #s(literal 1/6 binary64) b))))))
#s(approx (* -1 (* b (sin a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) b (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))))))))
#s(approx (* b (sin a)) (*.f64 a b))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) b (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))))))
#s(approx (* b (sin a)) (*.f64 a (+.f64 b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 #s(literal 1/120 binary64) b))))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) #s(literal 1 binary64))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (fma.f64 #s(literal -1 binary64) a (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (fma.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (cos a) b) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (cos a) b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (cos a) b) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b))) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (cos a) b) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) b)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b))) (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ 1 (* -1 (* a b))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1 (* a b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (* -1 (* a b)) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) #s(literal 1 binary64))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))
#s(approx (- (* 1/6 (* a b)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/6 (* a b)) 1/2) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
#s(approx (* 1/6 (* a b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/4 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) b)))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) a (*.f64 #s(literal 1/4 binary64) b))) #s(literal 1 binary64)))))
#s(approx (* -1/2 (* b (cos a))) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (* -1/2 (* b (cos a))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))
#s(approx (* -1/2 (* b (cos a))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 #s(literal 1/4 binary64) b)))))
#s(approx (* -1/2 (* b (cos a))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) b (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) b (*.f64 #s(literal 1/1440 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))))))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/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 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (+.f64 (/.f64 (sin.f64 b) (cos.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) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.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) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin b) (sin a)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin b) (sin a)) (*.f64 a (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) #s(literal 1 binary64))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))
#s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (* -1 b) (* -1/2 a)) (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* -1/2 a) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) (*.f64 #s(literal 1/6 binary64) (*.f64 a (pow.f64 b #s(literal 3 binary64)))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) (*.f64 a (fma.f64 #s(literal -1/36 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) (*.f64 a (fma.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 3 binary64)) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64)))))))))
#s(approx (* 1/6 (* (pow b 3) (sin a))) (*.f64 a (fma.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/30240 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (pow.f64 b #s(literal 3 binary64))))))))))
#s(approx (* (pow b 3) (sin a)) (*.f64 a (pow.f64 b #s(literal 3 binary64))))
#s(approx (* (pow b 3) (sin a)) (*.f64 a (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (pow.f64 b #s(literal 3 binary64)))))
#s(approx (* (pow b 3) (sin a)) (*.f64 a (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal 3 binary64)))))
#s(approx (* (pow b 3) (sin a)) (*.f64 a (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal 3 binary64)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 a (fma.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (fma.f64 a (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) #s(literal 1/2 binary64)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 a b))) #s(literal 1 binary64)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal 1/4 binary64) b (*.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 #s(literal -1/2 binary64) b))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal 1/6 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (fma.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 a b))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (fma.f64 #s(literal -1/2 binary64) b (*.f64 a (fma.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)) (*.f64 a (fma.f64 #s(literal -1/36 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) b)))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) b (*.f64 #s(literal 1/4 binary64) a))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (-.f64 (*.f64 a (fma.f64 #s(literal 1/6 binary64) b (*.f64 a (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 a b)))))) #s(literal 1/2 binary64)))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (cos.f64 b))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (+ (/ b a) 1) a) b)
#s(approx (* (+ (/ b a) 1) a) (+.f64 a b))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a))
#s(approx (* b (+ (pow a -1) (pow b -1))) (/.f64 b a))
#s(approx (* b (+ (pow a -1) (pow b -1))) (/.f64 (+.f64 a b) a))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 #s(literal 1 binary64) a))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))
#s(approx (/ (+ 1 (/ a b)) a) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ 1 (/ a b)) a) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a))
#s(approx (+ 1 (/ a b)) #s(literal 1 binary64))
#s(approx (+ 1 (/ a b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))
#s(approx (/ a b) (/.f64 a b))
#s(approx (pow a -1) (/.f64 #s(literal 1 binary64) a))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (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 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (cos.f64 b))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) b)
#s(approx (/ (- (* a a) (* b b)) (- a b)) (+.f64 a b))
#s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (- (* a a) (* b b)) (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- a b) (-.f64 a b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)) (pow.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (+.f64 (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+.f64 a (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) (*.f64 #s(literal -1 binary64) (/.f64 a b))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) (*.f64 #s(literal -1 binary64) (/.f64 a b))) a))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b)))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))))) (/.f64 (*.f64 r (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))))) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (*.f64 a (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (*.f64 a (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (*.f64 #s(literal -1/6 binary64) (*.f64 a (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) b)
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (+.f64 a b))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (- (* a a) (exp (* (log b) 2))) (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))) (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)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))) (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)) (/ (- (cos (- b a)) (cos (+ b a))) 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 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))) (cos.f64 b))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))) (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)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 b) (pow.f64 (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 b) (pow.f64 (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))) (cos.f64 b))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 b) (pow.f64 (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 a (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 b)) (*.f64 #s(literal -1/120 binary64) (sin.f64 b)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b)))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 b)) (*.f64 #s(literal 1/5040 binary64) (sin.f64 b)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 b)) (*.f64 #s(literal -1/120 binary64) (sin.f64 b)))))))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (*.f64 a (-.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (*.f64 a (-.f64 (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 b)) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))))) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (*.f64 a (-.f64 (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 b)) (*.f64 #s(literal -1/120 binary64) (sin.f64 b))))) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))))) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (*.f64 a (-.f64 (+.f64 (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/120 binary64) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 b)) (*.f64 #s(literal 1/5040 binary64) (sin.f64 b))))) (*.f64 #s(literal -1/120 binary64) (sin.f64 b))))) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))))) (*.f64 #s(literal -1 binary64) (sin.f64 b)))))
#s(approx (cos (- b a)) (cos.f64 b))
#s(approx (cos (- b a)) (+.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))
#s(approx (cos (- b a)) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (*.f64 #s(literal -1 binary64) (sin.f64 b))))))
#s(approx (cos (- b 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))))) (*.f64 #s(literal -1 binary64) (sin.f64 b))))))
#s(approx (- b a) b)
#s(approx (- b a) (+.f64 b (*.f64 #s(literal -1 binary64) a)))
#s(approx (cos (+ b a)) (cos.f64 b))
#s(approx (cos (+ b a)) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (cos (+ b 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 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 (+ b a) b)
#s(approx (+ b a) (+.f64 a b))
#s(approx (sin (+ (neg a) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (neg a) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (neg a) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg a) (*.f64 #s(literal -1 binary64) a))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (/.f64 (sin.f64 b) (cos.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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (* (* (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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (/.f64 (sin.f64 b) (cos.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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (/.f64 (sin.f64 b) (cos.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 b))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 b) (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 b)) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (cos.f64 b)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (cos.f64 b)))))) (sin.f64 b)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 a (fma.f64 a (fma.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/3 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 b)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 a (fma.f64 (cos.f64 b) (sin.f64 b) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/144 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/240 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))))))))))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64)))))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64)))))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 9/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64))) (/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 13 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64)))))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (+.f64 (/.f64 (sin.f64 b) (cos.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 (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 7 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64)))))) (cos.f64 b)) (+.f64 (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.f64 #s(literal 9/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (sin.f64 b))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 13 binary64)))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 11 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 12 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (cos.f64 b))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -9/2 binary64) (cos.f64 b) (*.f64 #s(literal -1 binary64) (cos.f64 b))) (fma.f64 #s(literal -3 binary64) (cos.f64 b) (*.f64 #s(literal -2 binary64) (cos.f64 b)))))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 b) (*.f64 a (fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -9/2 binary64) (cos.f64 b) (fma.f64 #s(literal -1 binary64) (cos.f64 b) (*.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (cos.f64 b)) (*.f64 #s(literal 9/2 binary64) (sin.f64 b))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (-.f64 (*.f64 #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 2 binary64))))))) (pow.f64 (cos.f64 b) #s(literal 10 binary64))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -3 binary64) (cos.f64 b) (*.f64 #s(literal -2 binary64) (cos.f64 b)))))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 75/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3 binary64) (-.f64 (*.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (fma.f64 #s(literal -9/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (*.f64 #s(literal 75/8 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -961/80 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 #s(literal 75/8 binary64) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (fma.f64 #s(literal -9/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (*.f64 #s(literal 75/8 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 b) #s(literal 9 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -961/80 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 #s(literal 75/8 binary64) (pow.f64 (cos.f64 b) #s(literal 9 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 a #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 a #s(literal 9 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64))) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 a #s(literal 9 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 b) #s(literal 9 binary64)) (*.f64 #s(literal 43/40 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64))))) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 a #s(literal 9 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 b) #s(literal 9 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2473/5040 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64))) (*.f64 #s(literal 43/40 binary64) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (pow.f64 (cos.f64 b) #s(literal 6 binary64)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 a (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 a (fma.f64 #s(literal 4 binary64) (*.f64 a (pow.f64 (cos.f64 b) #s(literal 6 binary64))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 6 binary64))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (pow.f64 (sin.f64 b) #s(literal 6 binary64))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 a (fma.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/4 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 b) #s(literal 6 binary64)))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/4 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 3/4 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -7/16 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -61/240 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -13/80 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -41/3024 binary64) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (*.f64 (cos.f64 b) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (cos.f64 b))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (cos.f64 b)) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (cos.f64 b))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #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 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (*.f64 #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 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 a (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 b) (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (fma.f64 a (fma.f64 #s(literal -2/3 binary64) (*.f64 (cos.f64 b) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))))) (pow.f64 (sin.f64 b) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b))))) (*.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 (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (+.f64 (/.f64 (sin.f64 b) (cos.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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (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 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (+.f64 (/.f64 (sin.f64 b) (cos.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 (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (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 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (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))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (fma.f64 a (fma.f64 a (-.f64 (fma.f64 a (-.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) (sin.f64 b)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 b) (sin.f64 b)))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 4 binary64))) (pow.f64 (cos.f64 b) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (+.f64 (/.f64 (*.f64 a (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b))))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b)))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (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/2 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b))))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b))) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b)) #s(literal 2 binary64)))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b)))) (pow.f64 (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))) #s(literal 2 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 b) (fma.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 b) (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))) (sin.f64 b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 b) (fma.f64 a (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))) (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (neg.f64 b)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (sin.f64 b)))))))) (sin.f64 b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))
#s(approx (sin (neg (+ a b))) (sin.f64 (neg.f64 b)))
#s(approx (sin (neg (+ a b))) (+.f64 (sin.f64 (neg.f64 b)) (*.f64 #s(literal -1 binary64) (*.f64 a (cos.f64 (neg.f64 b))))))
#s(approx (sin (neg (+ a b))) (+.f64 (sin.f64 (neg.f64 b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 b)) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sin.f64 (neg.f64 b))))))))
#s(approx (sin (neg (+ a b))) (+.f64 (sin.f64 (neg.f64 b)) (*.f64 a (fma.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 b)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 b)) (*.f64 #s(literal 1/6 binary64) (*.f64 a (cos.f64 (neg.f64 b))))))))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) b))
#s(approx (neg (+ a b)) (-.f64 (*.f64 #s(literal -1 binary64) a) b))
#s(approx (* (cos (+ a b)) 1) (cos.f64 b))
#s(approx (* (cos (+ a b)) 1) (+.f64 (cos.f64 b) (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))
#s(approx (* (cos (+ a b)) 1) (+.f64 (cos.f64 b) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (* (cos (+ a b)) 1) (+.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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (pow.f64 b #s(literal 2 binary64)) r (/.f64 (*.f64 b r) a))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 a (fma.f64 (pow.f64 b #s(literal 2 binary64)) r (/.f64 (*.f64 b r) a))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) r))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) r (/.f64 (*.f64 b r) a)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 a (fma.f64 (pow.f64 b #s(literal 2 binary64)) r (/.f64 (*.f64 b r) a))))
#s(approx (+ (* a r) (/ r b)) (*.f64 a r))
#s(approx (+ (* a r) (/ r b)) (*.f64 a (+.f64 r (/.f64 r (*.f64 a b)))))
#s(approx (cos a) (cos.f64 a))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* a a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 6 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2)) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (* a a) (+ 1/24 (* -1/720 (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))
#s(approx (+ r (* a (* b r))) (*.f64 a (fma.f64 b r (/.f64 r a))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* b (cos a)) (*.f64 b (cos.f64 a)))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 (* b (pow (cos a) 2)) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (cos a) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (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 (pow (* (cos a) (cos b)) 3) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) a)
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a) (/.f64 b a)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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) (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) (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)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (pow (* (sin a) (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 (* (cos a) (cos b)) 2) (pow (* (sin a) (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) (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) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
#s(approx (pow (cos a) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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)))) (pow (* (sin a) (sin b)) 2)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (*.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (pow.f64 (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(literal 2 binary64)))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ b (cos a)) (/.f64 b (cos.f64 a)))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) b (/.f64 b (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ 1 (* a b)) (*.f64 a b))
#s(approx (+ 1 (* a b)) (*.f64 a (+.f64 b (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ 1 (cos a)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* a a) (- (* 1/24 (* a a)) 1/2))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (* a a) (- (* 1/24 (* a a)) 1/2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/.f64 (sin.f64 b) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #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))) (+ (* (* (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 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 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 (+ (cos a) (* -1 (* b (sin a)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (* -1 (* b (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (* b (sin a)) (*.f64 b (sin.f64 a)))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))
#s(approx (/ (cos a) b) (/.f64 (cos.f64 a) b))
#s(approx (+ 1 (* -1 (* a b))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (+ 1 (* -1 (* a b))) (*.f64 a (fma.f64 #s(literal -1 binary64) b (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) b)))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) b (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) b)))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b)))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))
#s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (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 (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
#s(approx (* -1/2 (* b (cos a))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1/2 binary64))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b a) (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1/2 binary64))))
#s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1/2 binary64))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (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 (* 1/6 (* (pow b 3) (sin a))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (* (pow b 3) (sin a)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (fma.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (fma.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (fma.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (fma.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (fma.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (fma.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin 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 (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (-.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 (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (* (+ (/ b a) 1) a) a)
#s(approx (* (+ (/ b a) 1) a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 #s(literal 1 binary64) (/.f64 b a)))
#s(approx (* b (+ (pow a -1) (pow b -1))) #s(literal 1 binary64))
#s(approx (* b (+ (pow a -1) (pow b -1))) (+.f64 #s(literal 1 binary64) (/.f64 b a)))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 #s(literal 1 binary64) b))
#s(approx (+ (pow a -1) (pow b -1)) (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (+ 1 (/ a b)) a) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ 1 (/ a b)) a) (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ 1 (/ a b)) (/.f64 a b))
#s(approx (+ 1 (/ a b)) (*.f64 a (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (-.f64 a b)))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (cos.f64 (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (-.f64 a b))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) a)
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (- (* a a) (* b b)) (pow.f64 a #s(literal 2 binary64)))
#s(approx (- (* a a) (* b b)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (- a b) a)
#s(approx (- a b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 a (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a) (/.f64 b a)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) a)
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))) a))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b)) (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (/.f64 a b))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b)) (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (*.f64 #s(literal -1 binary64) (/.f64 a b)))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (/.f64 #s(literal 1 binary64) b))))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 #s(literal -1 binary64) b))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 a b))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 a b))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 a b))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 a b)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) a)
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 a (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 a (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) a)
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (- (* a a) (exp (* (log b) 2))) (pow.f64 a #s(literal 2 binary64)))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))
#s(approx (cos (- b a)) (cos.f64 (-.f64 b a)))
#s(approx (- b a) (*.f64 #s(literal -1 binary64) a))
#s(approx (- b a) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64))))
#s(approx (cos (+ b a)) (cos.f64 (+.f64 a b)))
#s(approx (+ b a) a)
#s(approx (+ b a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (+ (neg a) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a))
#s(approx (+ (neg a) (/ (PI) 2)) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 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 (+ (* (* (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 b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.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 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 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) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (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 b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.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 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 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)) 2) (* (sin a) (sin b)))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64)))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.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) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 (sin.f64 b) (*.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.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))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.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 9 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64))))) (*.f64 (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64)))))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64)))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (pow.f64 (cos.f64 b) #s(literal 9 binary64))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (pow.f64 (sin.f64 b) #s(literal 9 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (pow.f64 (cos.f64 b) #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (pow.f64 (sin.f64 b) #s(literal 6 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (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 (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 b) #s(literal 4 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (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(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 (+.f64 a b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 (+.f64 a b))))))
#s(approx (sin (neg (+ a b))) (sin.f64 (neg.f64 (+.f64 a b))))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) a))
#s(approx (neg (+ a b)) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64))))
#s(approx (* (cos (+ a b)) 1) (cos.f64 (+.f64 a b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a))))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a))))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b r) a))))))
#s(approx (+ (* a r) (/ r b)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal -1 binary64) (/.f64 r (*.f64 a b)))))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 b r) (*.f64 #s(literal -1 binary64) (/.f64 r a))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 #s(literal -1 binary64) (*.f64 a (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 (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (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 (+ 1 (* a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) b) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ 1 (* -1 (* a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 b (/.f64 #s(literal 1 binary64) a)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) b (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1/2 binary64)) a) (*.f64 #s(literal -1/6 binary64) b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (/.f64 #s(literal 1 binary64) a)) a)) #s(literal 1/2 binary64)) a) (*.f64 #s(literal -1/6 binary64) b)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) b (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1/2 binary64)) a) (*.f64 #s(literal -1/6 binary64) b)))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 b a)) a) (*.f64 #s(literal 1/6 binary64) b))))
#s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/6 binary64) b (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (/.f64 #s(literal 1 binary64) a)) a)) #s(literal 1/2 binary64))))
#s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) a)) #s(literal 1/2 binary64)) a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))) a))) a) (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/2 binary64)) a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) a)) #s(literal 1/2 binary64)) a))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a))) a) (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/2 binary64)) a))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) a))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64)) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) a)) #s(literal 1/2 binary64)) a))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))) a))) a) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)) a))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 b #s(literal 2 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 (* (+ (/ b a) 1) a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (cos.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 b (*.f64 #s(literal -1 binary64) a))))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (sin.f64 (-.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))) a)) #s(literal 1 binary64)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b)) (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (cos.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a))) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (cos (- b a)) (cos.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a))))))
#s(approx (cos (+ b a)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (sin (+ (neg a) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg a) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) b))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) b)))))
#s(approx (sin (neg (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) a) b)))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (* (cos (+ a b)) 1) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (* b b) (pow.f64 b #s(literal 2 binary64)))
#s(approx b b)
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 b (+.f64 r (*.f64 a (*.f64 b r)))))
#s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.f64 r (cos.f64 a)))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (/.f64 r (cos.f64 a)))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (+.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 (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 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 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (cos a) (cos b)) 3) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 3) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 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/6 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (/.f64 (*.f64 b r) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 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/6 binary64) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 r (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ b (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ b (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ b (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ b (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ b (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ b (* 1/2 (PI))) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (cos b) 2) #s(literal 1 binary64))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (pow (cos b) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1 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) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 b (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 r (*.f64 (cos.f64 a) (sin.f64 a)))) (*.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (sin.f64 a)))
#s(approx (* (cos b) (* (sin a) (sin b))) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #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 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #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 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (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) (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) (sin b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (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) (sin b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (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)) (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 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 (* (sin a) (sin b)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (* (sin a) (sin b)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))))) (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (pow (* (cos a) (cos b)) 2) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (cos a) 3) (pow (cos b) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -61/240 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (pow (cos b) 3) #s(literal 1 binary64))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 3/2 binary64)))))
#s(approx (pow (cos b) 3) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 7/8 binary64) (*.f64 #s(literal -61/240 binary64) (pow.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)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (cos.f64 a)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (*.f64 #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 (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (*.f64 #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 (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (cos.f64 a)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (/.f64 (*.f64 r (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))))) (*.f64 #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 (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (+.f64 (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (fma.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (/ r (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 5 binary64))) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (cos.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 r (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (*.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 (* (sin a) (sin b)) 2)) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (*.f64 b (fma.f64 b (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)))) (pow (* (sin a) (sin b)) 2)) (*.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 (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) (*.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) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (cos.f64 a)))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (*.f64 #s(literal -1/6 binary64) (cos.f64 a))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (fma.f64 #s(literal -1/6 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (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 2 binary64)))))))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a))))))))
#s(approx (/ (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 b (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (fma.f64 #s(literal -1/6 binary64) (cos.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal 1/120 binary64) (cos.f64 a) (*.f64 #s(literal 5/3 binary64) (cos.f64 a)))) (fma.f64 #s(literal -3/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (*.f64 #s(literal -1/6 binary64) (cos.f64 a))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))) (fma.f64 #s(literal 7/8 binary64) (cos.f64 a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a))))))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (*.f64 b (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (*.f64 b (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))
#s(approx (* (sin b) (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2))) (*.f64 b (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (* (cos a) (cos b)) 4) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))
#s(approx (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (fma.f64 #s(literal -2/3 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 #s(literal 1 binary64) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) b)
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
#s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 b (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 a b)))))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) b)
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 a b))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))
#s(approx (* a (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 b (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/3 binary64) (*.f64 a b)))))))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (fma.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 b a))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (fma.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (fma.f64 #s(literal 2/3 binary64) b (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) a))))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (sin b) (* a (cos b))) (/.f64 b a))
#s(approx (/ (sin b) (* a (cos b))) (*.f64 b (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (sin b) (* a (cos b))) (*.f64 b (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) a))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (sin b) (* a (cos b))) (*.f64 b (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 17/315 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a) (*.f64 #s(literal 2/15 binary64) (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) a))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* a (cos b)) a)
#s(approx (* a (cos b)) (+.f64 a (*.f64 #s(literal -1/2 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* a (cos b)) (+.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) a (*.f64 #s(literal 1/24 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (cos b)) (+.f64 a (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) a (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) a)))))))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (tan (+ b (PI))) (/.f64 (sin.f64 (PI.f64)) (cos.f64 (PI.f64))))
#s(approx (tan (+ b (PI))) (fma.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))))) (/.f64 (sin.f64 (PI.f64)) (cos.f64 (PI.f64)))))
#s(approx (tan (+ b (PI))) (fma.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (PI.f64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))))))) (cos.f64 (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))))) (/.f64 (sin.f64 (PI.f64)) (cos.f64 (PI.f64)))))
#s(approx (tan (+ b (PI))) (fma.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (PI.f64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64)))))) (cos.f64 (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64))))) (/.f64 (sin.f64 (PI.f64)) (cos.f64 (PI.f64)))))
#s(approx (+ b (PI)) (PI.f64))
#s(approx (+ b (PI)) (+.f64 b (PI.f64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64)))))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))))))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))))))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal 2 binary64) (PI.f64))))))
#s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64)))
#s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (/.f64 b (cos.f64 a)))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 7/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal 7/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 7/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (/.f64 b (cos.f64 a)))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 7/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (* (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal 7/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 7/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.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))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 7 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (/.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal 5/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (pow (* (cos a) (cos b)) 2) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 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 (fma.f64 #s(literal 5/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.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 3 binary64))) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 5 binary64)))))) (fma.f64 #s(literal 5/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (cos.f64 a)) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (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 2 binary64))))))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 4) (pow (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (pow (* (sin a) (sin b)) 2)) 2)) (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (cos.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 b (-.f64 (*.f64 #s(literal 5/3 binary64) (cos.f64 a)) (fma.f64 #s(literal -3/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (cos.f64 a)) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))) (fma.f64 #s(literal 7/8 binary64) (cos.f64 a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 4 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (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 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.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) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (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 (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (cos.f64 a))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (cos.f64 a))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 (cos.f64 a) b))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))) b))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (fma.f64 #s(literal -1/2 binary64) a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (fma.f64 #s(literal -1/2 binary64) a (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (cos.f64 a))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ 1 (* -1/2 (* b b))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/2 (* b b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/2 (* b b)) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) b)
#s(approx (* b (+ 1 (* -1/6 (* b b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ 1 (* -1/6 (* b b))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/6 (* b b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/6 (* b b)) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (cos.f64 a))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.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) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#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) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 #s(literal 1 binary64) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) b)
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64)))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (- (* 1/120 (* b b)) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* 1/120 (* b b)) 1/6) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64)))
#s(approx (* 1/120 (* b b)) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))))
#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 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ 1/24 (* -1/720 (* b b))) #s(literal 1/24 binary64))
#s(approx (+ 1/24 (* -1/720 (* b b))) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/720 (* b b)) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 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 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin b) (sin a)) (*.f64 b (+.f64 (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) b)
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ (* (* b b) -1/6) 1) #s(literal 1 binary64))
#s(approx (+ (* (* b b) -1/6) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (fma.f64 #s(literal -1 binary64) (*.f64 a b) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (cos.f64 a))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a)))))))))
#s(approx (pow b 3) (pow.f64 b #s(literal 3 binary64)))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 b (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 b (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64))))))) #s(literal 1/2 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (fma.f64 #s(literal -1/2 binary64) a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (fma.f64 #s(literal -1/2 binary64) a (*.f64 b (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 a b))) #s(literal 1 binary64)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (fma.f64 #s(literal -1/2 binary64) a (*.f64 b (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 b (fma.f64 #s(literal 1/4 binary64) a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) #s(literal -1/2 binary64))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (-.f64 (*.f64 b (fma.f64 #s(literal 1/6 binary64) a (*.f64 #s(literal 1/4 binary64) b))) #s(literal 1/2 binary64)))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (-.f64 (*.f64 b (fma.f64 #s(literal 1/6 binary64) a (*.f64 b (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 a b)))))) #s(literal 1/2 binary64)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 b (fma.f64 #s(literal 1/6 binary64) a (*.f64 #s(literal 1/4 binary64) b))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 b (fma.f64 #s(literal 1/6 binary64) a (*.f64 b (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 a b)))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) (*.f64 b (fma.f64 #s(literal -1/36 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) a))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) (*.f64 #s(literal 1/6 binary64) b))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ 1/6 (* -1/36 (* b b))) #s(literal 1/6 binary64))
#s(approx (+ 1/6 (* -1/36 (* b b))) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/36 (* b b)) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) (*.f64 #s(literal -1 binary64) b))
#s(approx (* b (- (* 1/6 (* b b)) 1)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (- (* 1/6 (* b b)) 1) #s(literal -1 binary64))
#s(approx (- (* 1/6 (* b b)) 1) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* 1/6 (* b b)) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 #s(literal 1 binary64) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (cos.f64 a))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) b))
#s(approx (/ (+ 1 (/ a b)) a) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) b))
#s(approx (+ 1 (/ a b)) (/.f64 (+.f64 a b) b))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- 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 a) (* b b)) (- a b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 #s(literal 1 binary64) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (cos.f64 a))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (- (* a a) (* b b)) (fma.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* -1 (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (exp (* (log b) 2)) (pow.f64 b #s(literal 2 binary64)))
#s(approx (* (log b) 2) (*.f64 #s(literal 2 binary64) (log.f64 b)))
#s(approx (log b) (log.f64 b))
#s(approx (- a b) (+.f64 a (*.f64 #s(literal -1 binary64) b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (/.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))) b))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))) b)))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))))) b))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))) b))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (/.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64)))) b))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64)) b))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b a) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a))) #s(literal 1 binary64)) b))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) (*.f64 a b))))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 b a) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a))) b))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b))))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a) (/.f64 b a)) b))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) (/.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (* 1/2 (/ (PI) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))
#s(approx (/ (PI) b) (/.f64 (PI.f64) b))
#s(approx (pow b -1) (/.f64 #s(literal 1 binary64) b))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/.f64 (*.f64 b r) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 r (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (+.f64 (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (* a a) (exp (* (log b) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* -1 (* b b)) (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/.f64 (*.f64 b r) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 r (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (/.f64 r (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (pow.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a)))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))))) (/.f64 r (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 a))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (pow.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64)))))) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (*.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 r (pow.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a)))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))))) (/.f64 r (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (/.f64 b (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a)))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))))))) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 a)))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (pow.f64 (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (cos.f64 a) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (+.f64 (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 a))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (fma.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))))))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (cos.f64 (neg.f64 a)) (cos.f64 a)))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (+.f64 (cos.f64 (neg.f64 a)) (*.f64 b (-.f64 (sin.f64 a) (sin.f64 (neg.f64 a))))) (cos.f64 a)))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (+.f64 (cos.f64 (neg.f64 a)) (*.f64 b (-.f64 (+.f64 (sin.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))))) (sin.f64 (neg.f64 a))))) (cos.f64 a)))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (+.f64 (cos.f64 (neg.f64 a)) (*.f64 b (-.f64 (+.f64 (sin.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 a)) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 a)))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))))) (sin.f64 (neg.f64 a))))) (cos.f64 a)))
#s(approx (cos (- b a)) (cos.f64 (neg.f64 a)))
#s(approx (cos (- b a)) (+.f64 (cos.f64 (neg.f64 a)) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 (neg.f64 a))))))
#s(approx (cos (- b a)) (+.f64 (cos.f64 (neg.f64 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 (neg.f64 a)))) (sin.f64 (neg.f64 a))))))
#s(approx (cos (- b a)) (+.f64 (cos.f64 (neg.f64 a)) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 (neg.f64 a)))))) (sin.f64 (neg.f64 a))))))
#s(approx (- b a) (-.f64 b a))
#s(approx (cos (+ b a)) (cos.f64 a))
#s(approx (cos (+ b a)) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (cos (+ b 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 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 (sin (+ b (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ b (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ b (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ b (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/6 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ b (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ b (/ (PI) 2)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (neg b) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (neg b) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- (* 1/24 (* b b)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* 1/24 (* b b)) 1/2) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/24 (* b b)) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) b)
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64)))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64)))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64)))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64)))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) #s(literal 1/120 binary64))
#s(approx (+ 1/120 (* -1/5040 (* b b))) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* -1/5040 (* b b)) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (* (* (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 (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (/ (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -3/2 binary64) (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -3/2 binary64) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (cos.f64 a)))))))) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (cos.f64 a)))))) (sin.f64 a)))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (cos.f64 a))
#s(approx (/ (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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)) 2) (* (sin a) (sin b)))) (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.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)) 2) (* (sin a) (sin b)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 3) (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 7/8 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))
#s(approx (* (pow (* (sin a) (sin b)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 13/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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)) 2) (* (sin a) (sin b))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -41/3024 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/3 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 a)))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (pow.f64 b #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))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 a) (fma.f64 #s(literal 1/120 binary64) (sin.f64 a) (fma.f64 #s(literal 1/24 binary64) (sin.f64 a) (*.f64 #s(literal 1/12 binary64) (sin.f64 a)))))))))))
#s(approx (* (* (cos a) (cos b)) (* (sin a) (sin b))) (*.f64 b (fma.f64 (cos.f64 a) (sin.f64 a) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/144 binary64) (sin.f64 a) (fma.f64 #s(literal -1/240 binary64) (sin.f64 a) (fma.f64 #s(literal -1/720 binary64) (sin.f64 a) (*.f64 #s(literal -1/5040 binary64) (sin.f64 a))))))))))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (pow.f64 (cos.f64 a) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 12 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 7 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (pow.f64 (cos.f64 a) #s(literal 11 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 12 binary64)))))) (cos.f64 a)) (+.f64 (/.f64 (*.f64 r (*.f64 (sin.f64 a) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 a) #s(literal 13 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (*.f64 #s(literal 9/2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (sin.f64 a))))) (pow.f64 (cos.f64 a) #s(literal 12 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))))) (pow.f64 (cos.f64 a) #s(literal 11 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 12 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 7/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 19/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (sin b) (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal 7/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 7/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 19/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1 binary64) (/.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))) (fma.f64 #s(literal 9/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 11 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 13 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 19/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (cos.f64 a))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -9/2 binary64) (cos.f64 a) (*.f64 #s(literal -1 binary64) (cos.f64 a))) (fma.f64 #s(literal -3 binary64) (cos.f64 a) (*.f64 #s(literal -2 binary64) (cos.f64 a)))))))))
#s(approx (/ (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (+.f64 (cos.f64 a) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -9/2 binary64) (cos.f64 a) (fma.f64 #s(literal -1 binary64) (cos.f64 a) (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 #s(literal 9/2 binary64) (sin.f64 a))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 10 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 a) #s(literal 10 binary64))) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -3 binary64) (cos.f64 a) (*.f64 #s(literal -2 binary64) (cos.f64 a)))))))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 b (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (/ (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 75/8 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3 binary64) (-.f64 (*.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (pow.f64 (cos.f64 a) #s(literal 9 binary64)))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (fma.f64 #s(literal -9/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 9 binary64))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (*.f64 #s(literal 75/8 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))
#s(approx (- (pow (pow (* (cos a) (cos b)) 3) 3) (pow (pow (* (sin a) (sin b)) 3) 3)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -961/80 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 9 binary64))) (*.f64 #s(literal 75/8 binary64) (pow.f64 (cos.f64 a) #s(literal 9 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (pow.f64 (cos.f64 a) #s(literal 9 binary64)))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (fma.f64 #s(literal -9/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 9 binary64))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (*.f64 #s(literal 75/8 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))
#s(approx (pow (pow (* (cos a) (cos b)) 3) 3) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -9/2 binary64) (pow.f64 (cos.f64 a) #s(literal 9 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -961/80 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 9 binary64))) (*.f64 #s(literal 75/8 binary64) (pow.f64 (cos.f64 a) #s(literal 9 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 9 binary64))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 b #s(literal 9 binary64)) (pow.f64 (sin.f64 a) #s(literal 9 binary64))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 b #s(literal 9 binary64)) (fma.f64 #s(literal -3/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 9 binary64))) (pow.f64 (sin.f64 a) #s(literal 9 binary64)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 b #s(literal 9 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (*.f64 #s(literal 43/40 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 9 binary64))))) (pow.f64 (sin.f64 a) #s(literal 9 binary64)))))
#s(approx (pow (pow (* (sin a) (sin b)) 3) 3) (*.f64 (pow.f64 b #s(literal 9 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 9 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2473/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 9 binary64))) (*.f64 #s(literal 43/40 binary64) (pow.f64 (sin.f64 a) #s(literal 9 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 9 binary64)))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (pow.f64 (cos.f64 a) #s(literal 6 binary64)))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (*.f64 b (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (* (pow (* (cos a) (cos b)) 3) (pow (* (cos a) (cos b)) 3)) (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (cos.f64 a) #s(literal 6 binary64)) (*.f64 b (fma.f64 #s(literal 4 binary64) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 6 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 6 binary64))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 b (pow.f64 (sin.f64 a) #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))
#s(approx (+ (* (pow (* (sin a) (sin b)) 3) (pow (* (sin a) (sin b)) 3)) (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 b (fma.f64 b (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 a) #s(literal 6 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))
#s(approx (* (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -7/16 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -61/240 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -13/80 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -41/3024 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (*.f64 (cos.f64 a) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 3 binary64)) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (cos.f64 a))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 a) (sin.f64 a)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 #s(literal 5/3 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -34/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 4 binary64))) (*.f64 #s(literal 5/3 binary64) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 a) #s(literal 4 binary64))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 b (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))
#s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 b (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (fma.f64 b (fma.f64 #s(literal -2/3 binary64) (*.f64 (cos.f64 a) (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))) (pow.f64 (sin.f64 a) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))) (*.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 (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (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 (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 #s(literal 1 binary64) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin b) -1) (/.f64 #s(literal 1 binary64) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (pow.f64 b #s(literal 2 binary64)))))) b))
#s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (pow.f64 b #s(literal 2 binary64)))))))) b))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)))) b))
#s(approx (+ 1 (* 1/6 (* b b))) #s(literal 1 binary64))
#s(approx (+ 1 (* 1/6 (* b b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (* r (/ (/ 1 (/ 1 (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 (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 #s(literal 1 binary64) (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ 1 (/ 1 (sin b))) b)
#s(approx (/ 1 (/ 1 (sin b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ 1 (/ 1 (sin b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (/ 1 (/ 1 (sin b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (/ 1 (sin b)) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ 1 (sin b)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64)))) b))
#s(approx (/ 1 (sin b)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (pow.f64 b #s(literal 2 binary64)))))) b))
#s(approx (/ 1 (sin b)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (pow.f64 b #s(literal 2 binary64)))))))) b))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))) (*.f64 b (fma.f64 b (fma.f64 b (-.f64 (fma.f64 b (-.f64 (/.f64 (*.f64 r (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 a) (sin.f64 a)) (*.f64 (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (sin.f64 a) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 4 binary64)))))) (/.f64 (*.f64 r (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 a) #s(literal 2 binary64))))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (/.f64 r (cos.f64 a)))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 r (cos.f64 a)))))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) r (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* (sin b) r) (*.f64 b (+.f64 r (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) r (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (- (* (cos a) (cos b)) (* (sin a) (sin b)))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 a) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (/.f64 (*.f64 b r) (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64))) (/.f64 r (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)) #s(literal 2 binary64))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64)))) (/.f64 r (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (*.f64 b (fma.f64 b (-.f64 (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 r (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)) #s(literal 2 binary64))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64)))))) (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 r (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)) #s(literal 2 binary64))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 3 binary64))) (/.f64 (*.f64 r (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 r (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a))) (pow.f64 (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))) #s(literal 2 binary64)))) (/.f64 r (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a)))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 a) (fma.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 a)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 a) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))) (sin.f64 a)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 a) (fma.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (neg.f64 a)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (sin.f64 a)))))))) (sin.f64 a)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))
#s(approx (sin (neg (+ a b))) (sin.f64 (neg.f64 a)))
#s(approx (sin (neg (+ a b))) (+.f64 (sin.f64 (neg.f64 a)) (*.f64 #s(literal -1 binary64) (*.f64 b (cos.f64 (neg.f64 a))))))
#s(approx (sin (neg (+ a b))) (+.f64 (sin.f64 (neg.f64 a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (sin.f64 (neg.f64 a))))))))
#s(approx (sin (neg (+ a b))) (+.f64 (sin.f64 (neg.f64 a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 a)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 a)) (*.f64 #s(literal 1/6 binary64) (*.f64 b (cos.f64 (neg.f64 a))))))))))
#s(approx (neg (+ a b)) (-.f64 (*.f64 #s(literal -1 binary64) b) a))
#s(approx (* (cos (+ a b)) 1) (cos.f64 a))
#s(approx (* (cos (+ a b)) 1) (+.f64 (cos.f64 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))
#s(approx (* (cos (+ a b)) 1) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (* (cos (+ a b)) 1) (+.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 (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 a r (/.f64 r b))))
#s(approx (* a (+ (* (* b b) r) (/ (* b r) a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 a r (/.f64 r b))))
#s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 r (/.f64 r (*.f64 a b)))))
#s(approx (* (* b b) (+ (* a r) (/ r b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 a r (/.f64 r b))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ r (* a (* b r))) (*.f64 b (fma.f64 a r (/.f64 r b))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (/.f64 (*.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (cos b) (cos.f64 b))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a (+ b (* 1/2 (PI)))) b)
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (sin (+ b (* 1/2 (PI)))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ b (* 1/2 (PI))) b)
#s(approx (+ b (* 1/2 (PI))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (pow (cos b) 2) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
#s(approx (pow (cos b) 3) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
#s(approx (tan b) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (tan (+ b (PI))) (/.f64 (sin.f64 (+.f64 b (PI.f64))) (cos.f64 (+.f64 b (PI.f64)))))
#s(approx (+ b (PI)) b)
#s(approx (+ b (PI)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 (PI.f64) b))))
#s(approx (tan (+ (+ b (PI)) (PI))) (/.f64 (sin.f64 (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))) (cos.f64 (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64))))))
#s(approx (+ (+ b (PI)) (PI)) b)
#s(approx (+ (+ b (PI)) (PI)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (*.f64 #s(literal -1 binary64) (sin.f64 a)))
#s(approx (+ 1 (* -1 (* a b))) (*.f64 b (fma.f64 #s(literal -1 binary64) a (/.f64 #s(literal 1 binary64) b))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 a (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 a b) (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1 binary64))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 a b) (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (/.f64 (cos.f64 a) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (sin.f64 a) b))))
#s(approx (+ 1 (* -1/2 (* b b))) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (* b b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))))
#s(approx (* b (- (* -1/2 (* b (cos a))) (sin a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (+ 1 (* -1/6 (* b b))) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/6 (* b b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 5 binary64))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (- (* 1/120 (* b b)) 1/6)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (- (* 1/120 (* b b)) 1/6) (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (- (* 1/120 (* b b)) 1/6) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 6 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2)) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (- (* (* b b) (+ 1/24 (* -1/720 (* b b)))) 1/2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/720 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (+ 1/24 (* -1/720 (* b b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (+ 1/24 (* -1/720 (* b b))) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1/24 (* -1/720 (* b b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/720 binary64))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (* (* b b) -1/6) 1) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) a (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (*.f64 b (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)))))
#s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (/.f64 (cos.f64 a) (pow.f64 b #s(literal 3 binary64))))) (/.f64 (sin.f64 a) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 a (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 3 binary64))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 a (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 a (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (fma.f64 a (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 a b))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 a b))))) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64))) (fma.f64 #s(literal -1/36 binary64) (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 a b)))))) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 #s(literal -1/36 binary64) (*.f64 a (pow.f64 b #s(literal 3 binary64)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/36 binary64) a (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/36 binary64) a (fma.f64 #s(literal 1/6 binary64) (/.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/36 binary64) a (fma.f64 #s(literal 1/6 binary64) (/.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 #s(literal -1/36 binary64) (*.f64 a (pow.f64 b #s(literal 3 binary64)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/36 binary64) a (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/36 binary64) a (fma.f64 #s(literal 1/6 binary64) (/.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) (*.f64 #s(literal -1/36 binary64) (*.f64 a (pow.f64 b #s(literal 3 binary64)))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/36 binary64) a (*.f64 #s(literal 1/6 binary64) (/.f64 a (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/36 binary64))))
#s(approx (+ 1/6 (* -1/36 (* b b))) (*.f64 #s(literal -1/36 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1/6 (* -1/36 (* b b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/36 binary64))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (- (* 1/6 (* b b)) 1) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (- (* 1/6 (* b b)) 1) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))
#s(approx (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))
#s(approx (* b (+ (pow a -1) (pow b -1))) (*.f64 b (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (- (* a a) (* b b)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (* (log b) 2) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b))))
#s(approx (log b) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b))))
#s(approx (- a b) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64))))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) b)
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) #s(literal 1 binary64))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) #s(literal 1 binary64))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))) b))))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) #s(literal -1 binary64))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (-.f64 (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64))) b) #s(literal 1 binary64)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 #s(literal -1 binary64) a))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) (*.f64 a b))) (+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (/.f64 #s(literal -1 binary64) a))
#s(approx (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) (*.f64 a b))) (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ 1 (* 1/2 (/ (PI) b))) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) (*.f64 a b)) (/.f64 #s(literal 1 binary64) a)))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) #s(literal 1 binary64))
#s(approx (+ 1 (* 1/2 (/ (PI) b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) b)
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (+.f64 (/.f64 a b) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (- b a) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b)))))
#s(approx (+ b a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (sin (+ b (/ (PI) 2))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ b (/ (PI) 2)) b)
#s(approx (+ b (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (+ (neg b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b))
#s(approx (+ (neg b) (/ (PI) 2)) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* 1/24 (* b b)) 1/2))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (- (* 1/24 (* b b)) 1/2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (- (* 1/24 (* b b)) 1/2) (*.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (- (* 1/24 (* b b)) 1/2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 7 binary64))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/5040 binary64))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (fma.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 6 binary64)))) (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/5040 binary64))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 6 binary64)))) (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 6 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/5040 binary64))))
#s(approx (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)) (*.f64 (pow.f64 b #s(literal 6 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/5040 binary64))))
#s(approx (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/5040 binary64))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) (*.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1/120 (* -1/5040 (* b b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/5040 binary64))))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (pow (sin b) -1) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (*.f64 #s(literal 1/6 binary64) b))
#s(approx (/ (+ 1 (* 1/6 (* b b))) b) (*.f64 b (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (+ 1 (* 1/6 (* b b))) (*.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1 (* 1/6 (* b b))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ 1 (/ 1 (sin b))) (sin.f64 b))
#s(approx (/ 1 (sin b)) (/.f64 #s(literal 1 binary64) (sin.f64 b)))
#s(approx (neg (+ a b)) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 b (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
#s(approx (+ r (* a (* b r))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 a r) (*.f64 #s(literal -1 binary64) (/.f64 r b))))))
#s(approx (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 r (*.f64 b (cos.f64 a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))))
#s(approx (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI)))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (sin (+ a (+ b (* 1/2 (PI))))) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ a (+ b (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (sin (+ b (* 1/2 (PI)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ b (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (tan (+ b (PI))) (/.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 #s(literal -1 binary64) b))) (cos.f64 (-.f64 (PI.f64) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ b (PI)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (tan (+ (+ b (PI)) (PI))) (/.f64 (sin.f64 (-.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))) (cos.f64 (-.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a)))))))
#s(approx (+ 1 (* a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) a) (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (* b (+ (* -1 (sin a)) (/ (cos a) b))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ 1 (* -1 (* a b))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 a (/.f64 #s(literal 1 binary64) b)))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))) b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* a (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 a b)))))))
#s(approx (* a (- (* 1/6 (* a b)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 a b))))))
#s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) a (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a)))))
#s(approx (- (* -1/2 (* b (cos a))) (sin a)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 a) (/.f64 (sin.f64 a) b)))))
#s(approx (* b (+ 1 (* -1/6 (* b b)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ (* (neg b) (sin a)) (cos a)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) #s(literal 1/120 binary64)))))
#s(approx (* b (+ 1 (* (* b b) (- (* 1/120 (* b b)) 1/6)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (* (+ (* (* b b) -1/6) 1) b) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))) b))))))
#s(approx (* a (+ (* -1 b) (* -1/2 a))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b))))))
#s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 a b))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))
#s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 a) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b))) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))) b) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ 1 (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))) b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))))) b) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))) b) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* -1/2 (* b b)) (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))))) b) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))) b) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (* a (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))))) b) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) b) (*.f64 a (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 a b) (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/6 binary64)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)))) b) (*.f64 #s(literal 1/4 binary64) a)) b) (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/6 binary64)))))
#s(approx (+ (* a (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2)) (* b (- (* 1/6 (* b b)) 1))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 a b)))) b) (*.f64 #s(literal 1/4 binary64) a)) b) (*.f64 #s(literal 1/36 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/6 binary64)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/36 binary64) a) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 a b))) b) (*.f64 #s(literal 1/36 binary64) a)))))
#s(approx (- (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) a (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b))) b))) b) (*.f64 #s(literal 1/36 binary64) a)))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/36 binary64) a) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) b))))))
#s(approx (+ (* 1/4 (* b b)) (* a (* b (+ 1/6 (* -1/36 (* b b)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 a b))) b) (*.f64 #s(literal 1/36 binary64) a)))))
#s(approx (* a (* b (+ 1/6 (* -1/36 (* b b))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 a (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/36 binary64) a)))))
#s(approx (* b (+ 1/6 (* -1/36 (* b b)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/36 binary64) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* b (- (* 1/6 (* b b)) 1)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64)))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 a) b))))))
#s(approx (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))))))
#s(approx (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 a) (/.f64 (sin.f64 a) b)) b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a)))))
#s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 a) 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 (* (+ (/ b a) 1) a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (/ (sin b) (cos (/ (- (* a a) (* b b)) (- a b)))) (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (cos (/ (- (* a a) (* b b)) (- a b))) (cos.f64 (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (+.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (- (* a a) (* b b)) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* (log b) 2) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))))))
#s(approx (log b) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))))
#s(approx (- a b) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (sin b) (sin (+ (+ a b) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) (sin.f64 (-.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b)))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 a b) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b))) #s(literal 1 binary64)))))
#s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) a (*.f64 #s(literal -1/2 binary64) (PI.f64))) b))))
#s(approx (* -1 (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)))) b)))
#s(approx (* a (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)))) b)) #s(literal 1 binary64)))
#s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a))) b)) (/.f64 #s(literal 1 binary64) a)))
#s(approx (* r (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))))))
#s(approx (/ (sin b) (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))))))
#s(approx (sin (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (+ (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) b)) #s(literal 1 binary64)))))
#s(approx (/ (- (* a a) (exp (* (log b) 2))) (- a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)))) (/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2))) (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))))))
#s(approx (- (* (cos b) (cos a)) (/ (- (cos (- b a)) (cos (+ b a))) 2)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))))
#s(approx (/ (- (cos (- b a)) (cos (+ b a))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))))
#s(approx (- (cos (- b a)) (cos (+ b a))) (-.f64 (cos.f64 (neg.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)))) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (cos (- b a)) (cos.f64 (neg.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64)))))
#s(approx (cos (+ b a)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (sin (+ b (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))
#s(approx (+ b (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (sin (+ (neg b) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 #s(literal 1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* b (+ 1 (* (* b b) (- (* (* b b) (+ 1/120 (* -1/5040 (* b b)))) 1/6)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 7 binary64)) (-.f64 (+.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/6 binary64) (pow.f64 b #s(literal 4 binary64)))) (fma.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 6 binary64))))))))
#s(approx (* r (/ (/ 1 (pow (sin b) -1)) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (/ 1 (pow (sin b) -1)) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* r (/ (/ 1 (/ 1 (sin b))) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (/ 1 (/ 1 (sin b))) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (* (sin b) r) (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1))) (/.f64 (*.f64 r (sin.f64 b)) (+.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) a))))))
#s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) a)))))
#s(approx (sin (neg (+ a b))) (sin.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) a)))
#s(approx (neg (+ a b)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (* (cos (+ a b)) 1) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))

eval1.3s (10.2%)

Memory
81.9MiB live, 1 795.7MiB allocated; 340ms collecting garbage
Compiler

Compiled 653 395 to 26 172 computations (96% saved)

prune626.0ms (4.9%)

Memory
8.8MiB live, 995.9MiB allocated; 174ms collecting garbage
Pruning

116 alts after pruning (39 fresh and 77 done)

PrunedKeptTotal
New6 541396 580
Fresh000
Picked234770
Done13031
Total6 5651166 681
Accuracy
100.0%
Counts
6 681 → 116
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.0%
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 #s(approx (sin (neg (+ a b))) (sin.f64 (neg.f64 b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
✓99.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
✓58.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
✓59.7%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
✓57.4%
(/.f64 (*.f64 (sin.f64 b) r) #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)))
✓58.0%
(/.f64 (*.f64 (sin.f64 b) r) #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)))
57.3%
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))
57.8%
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))
✓54.0%
(/.f64 (*.f64 #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)))))) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
✓56.4%
(/.f64 #s(approx (* (sin b) r) (*.f64 b r)) #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))))))
✓99.5%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
✓57.4%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
✓53.7%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
99.2%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) #s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 #s(approx (pow (* (sin a) (sin b)) 2) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
38.9%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(approx (pow (cos a) 2) #s(literal 1 binary64))))))
✓99.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓53.9%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
✓53.9%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
✓54.0%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))))
7.9%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 #s(approx (+ (neg b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))) (*.f64 (sin.f64 b) (sin.f64 a)))))
15.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 #s(approx (+ (neg a) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))) (*.f64 (sin.f64 b) (sin.f64 a)))))
7.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 #s(approx (+ b (/ (PI) 2)) b))) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓58.5%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
37.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 #s(approx (+ b a) b))) #s(literal 2 binary64)))))
57.8%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 #s(approx (+ b a) a))) #s(literal 2 binary64)))))
✓59.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓36.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
31.9%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (pow.f64 a #s(literal 2 binary64))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
28.8%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) #s(approx (- a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓8.7%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))))
6.8%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a #s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 #s(literal -1 binary64) a))))))))))
✓14.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
✓8.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))))
✓15.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
✓32.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
✓43.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
✓19.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))))
✓43.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
39.1%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 #s(approx (+ 1 (/ a b)) (/.f64 a b)) a)))) a)))))
41.4%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 #s(approx (+ 1 (/ a b)) #s(literal 1 binary64)) a)))) a)))))
✓57.4%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
✓39.3%
(*.f64 r (/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
✓36.8%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
✓54.2%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))))
✓53.4%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))))
✓53.7%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
✓32.2%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
✓2.8%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))))
30.7%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
30.7%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
30.8%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
30.9%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
7.4%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
✓32.6%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
✓53.3%
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
53.2%
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
✓32.6%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
56.7%
(*.f64 r (/.f64 #s(approx (sin b) #s(approx (* (+ (* (* b b) -1/6) 1) b) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
✓54.4%
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))))
✓33.3%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
31.4%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
✓56.8%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))))
35.6%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) #s(approx (/ (cos a) b) (/.f64 #s(literal 1 binary64) b))))))))
32.9%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
✓6.5%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
8.1%
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
✓99.3%
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))))
✓55.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
✓53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
✓31.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
✓31.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
✓9.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
✓53.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
31.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
✓16.2%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
✓29.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
✓29.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
29.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
7.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
✓7.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
✓57.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
✓25.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
✓11.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
✓32.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
✓56.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
✓31.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
31.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
✓32.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
✓32.5%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
✓32.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
✓16.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
✓53.4%
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
✓99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
✓99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
✓99.2%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
57.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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) #s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
38.5%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) #s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
✓18.9%
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
✓18.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 (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) a))))
53.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 #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) #s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
✓41.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
✓27.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
41.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (*.f64 r (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) b))
✓16.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
✓53.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
✓31.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
✓8.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
✓9.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
23.2%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
24.1%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
✓16.2%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
31.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
26.1%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
Compiler

Compiled 15 096 to 4 369 computations (71.1% saved)

regimes434.0ms (3.4%)

Memory
3.8MiB live, 556.7MiB allocated; 164ms collecting garbage
Counts
195 → 1
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) 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))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
(*.f64 r #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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) #s(approx (/ (cos a) b) (/.f64 #s(literal 1 binary64) b))))))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #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 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) 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)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.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 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 r (/.f64 (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)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(/.f64 #s(approx (* (sin b) r) (*.f64 b r)) #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))))))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (* b (cos a)) b)) (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (/.f64 a b)))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 #s(approx (+ 1 (/ a b)) #s(literal 1 binary64)) a)))) a)))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) (/.f64 (cos.f64 a) b)))))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) #s(approx (- a b) a)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b))) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a #s(approx (- (* -1 (/ (+ 1 (* 1/2 (/ (PI) b))) a)) (pow b -1)) (/.f64 #s(literal -1 binary64) a))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos 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 #s(approx (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a)))) #s(literal -1/2 binary64))) (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 #s(approx (+ 1 (/ a b)) (/.f64 a b)) a)))) a)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) a)))) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) #s(approx (- a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b) (/.f64 a b))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b b))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b #s(approx (+ (pow a -1) (pow b -1)) (pow.f64 a #s(literal -1 binary64))))) a)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) #s(approx (pow (cos a) 2) #s(literal 1 binary64))))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #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 b))))
(*.f64 r (/.f64 #s(approx (sin b) #s(approx (* (+ (* (* b b) -1/6) 1) b) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
(/.f64 (*.f64 (sin.f64 b) r) #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))))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos a) b) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 #s(approx (sin b) 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 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (/.f64 #s(approx (- (* a a) (exp (* (log b) 2))) (pow.f64 a #s(literal 2 binary64))) (-.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) (sin.f64 a)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b)))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 b #s(approx (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b))) a)) (pow.f64 b #s(literal -1 binary64)))))))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
(*.f64 r (/.f64 #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)))))) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 #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)))))) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) #s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 #s(approx (+ b (/ (PI) 2)) b))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 #s(approx (+ (neg a) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) a)))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 #s(approx (+ (neg b) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) b)))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin b) (sin a)) (*.f64 b (sin.f64 a))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (*.f64 b (+.f64 (pow.f64 a #s(literal -1 binary64)) (pow.f64 b #s(literal -1 binary64))))) a)))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 a) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 a))))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (sin (neg (+ a b))) (cos (/ (PI) 2))) (* (cos (+ a b)) 1)) (+.f64 (cos.f64 b) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (neg.f64 b))))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 #s(approx (+ b a) a))) #s(literal 2 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 #s(approx (+ b a) b))) #s(literal 2 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 b a))) #s(literal 2 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 #s(approx (- (* a a) (* b b)) (*.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))) (-.f64 a b)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (-.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))) (-.f64 a b)))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 #s(approx (sin (neg (+ a b))) (sin.f64 (neg.f64 b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (*.f64 r (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (cos.f64 a))) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b (+.f64 (/.f64 r (*.f64 b (cos.f64 a))) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) b))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (+.f64 (cos.f64 a) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 a) (*.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 #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))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (*.f64 #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)))))) r) (-.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) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) #s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.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 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) #s(approx (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.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 #s(approx (- (* (pow (cos a) 3) (pow (cos b) 3)) (pow (* (sin a) (sin b)) 3)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(approx (+ (* (* (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))))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (sin.f64 (neg.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 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a (+.f64 (/.f64 (sin.f64 b) (*.f64 a (cos.f64 b))) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (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 #s(approx (* (sin b) (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2)))) (*.f64 b (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) #s(approx (+ (* (cos a) (* (cos b) (* (sin a) (sin b)))) (+ (pow (* (cos a) (cos b)) 2) (pow (* (sin a) (sin b)) 2))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (/.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))) #s(approx (+ (* (* (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 (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (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))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (/.f64 (*.f64 r (*.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) #s(approx (+ (* (pow (cos a) 2) (pow (cos b) 2)) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 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 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (*.f64 #s(approx (pow (* (sin a) (sin b)) 2) (*.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 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
#s(approx (* r (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))))))) (*.f64 (/.f64 r (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))))))
(*.f64 r #s(approx (/ (sin b) (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (/ (- (* (pow (* (cos a) (cos b)) 2) (pow (* (cos a) (cos b)) 2)) (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) (- (pow (* (cos a) (cos b)) 2) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))))) (*.f64 (/.f64 (sin.f64 b) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))) (-.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) #s(approx (* (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b)))) (+ (pow (* (sin a) (sin b)) 2) (* (* (cos a) (cos b)) (* (sin a) (sin b))))) (pow.f64 (fma.f64 (cos.f64 a) (*.f64 (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b))) (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))))
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:

150.0ms
b
103.0ms
r
61.0ms
a
58.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
50.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
99.6%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
99.6%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
99.6%1r
99.6%1a
99.6%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes267.0ms (2.1%)

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

5 calls:

63.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
56.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
47.0ms
b
46.0ms
r
43.0ms
a
Results
AccuracySegmentsBranch
78.1%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
78.1%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
78.1%1r
78.1%1a
78.1%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes112.0ms (0.9%)

Memory
37.8MiB live, 224.1MiB allocated; 12ms collecting garbage
Counts
82 → 3
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) 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))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
(*.f64 r #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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) #s(approx (/ (cos a) b) (/.f64 #s(literal 1 binary64) b))))))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #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 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) 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)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
(/.f64 (*.f64 (sin.f64 b) r) #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)))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
Calls

5 calls:

23.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
21.0ms
b
21.0ms
a
21.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
20.0ms
r
Results
AccuracySegmentsBranch
78.0%3b
78.1%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
68.4%6r
78.6%3a
64.3%3(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes70.0ms (0.6%)

Memory
-6.2MiB live, 134.1MiB allocated; 13ms collecting garbage
Counts
76 → 3
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r (/.f64 #s(approx (sin b) 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))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* (* a a) (- (* (* a a) (+ 1/24 (* -1/720 (* a a)))) 1/2))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 6 binary64))))))))
(*.f64 r #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 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r (*.f64 b (cos.f64 a)))))) b))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos a) b) -1/2) (sin a)) b) (cos a)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b (fma.f64 #s(literal -1 binary64) (sin.f64 a) #s(approx (/ (cos a) b) (/.f64 #s(literal 1 binary64) b))))))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 b b))) b))) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (pow.f64 (cos.f64 a) #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 r (sin.f64 b)) (sin.f64 #s(approx (+ a (+ b (* 1/2 (PI)))) 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)) (sin.f64 #s(approx (+ b (* 1/2 (PI))) b))))
Outputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Calls

3 calls:

24.0ms
b
20.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
18.0ms
a
Results
AccuracySegmentsBranch
78.0%3b
78.0%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
76.2%3a
Compiler

Compiled 9 to 13 computations (-44.4% saved)

regimes38.0ms (0.3%)

Memory
-15.0MiB live, 75.9MiB allocated; 7ms collecting garbage
Counts
59 → 3
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
Outputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Calls

2 calls:

17.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
17.0ms
b
Results
AccuracySegmentsBranch
78.0%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
78.0%3b
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes35.0ms (0.3%)

Memory
29.1MiB live, 74.4MiB allocated; 3ms collecting garbage
Counts
58 → 3
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
Outputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Calls

2 calls:

16.0ms
b
14.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
78.0%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
78.0%3b
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes88.0ms (0.7%)

Memory
-18.4MiB live, 167.5MiB allocated; 19ms collecting garbage
Counts
57 → 1
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) (*.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 b b) (*.f64 a (*.f64 b (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 b b)))))) #s(literal 1/2 binary64)) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 #s(approx (+ (+ b (PI)) (PI)) (+.f64 b (*.f64 #s(literal 2 binary64) (PI.f64)))))))
Outputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Calls

5 calls:

21.0ms
b
16.0ms
r
16.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
16.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
14.0ms
a
Results
AccuracySegmentsBranch
57.4%1r
57.4%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
57.4%1a
57.4%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
57.4%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes99.0ms (0.8%)

Memory
21.4MiB live, 159.2MiB allocated; 54ms collecting garbage
Counts
50 → 1
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (*.f64 (*.f64 b b) r)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) #s(approx (+ r (* a (* b r))) (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 a b))) b)))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (+.f64 r (*.f64 a (*.f64 b r)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (* (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) b) (+.f64 b (*.f64 a (*.f64 b b))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) (+.f64 #s(literal 1 binary64) (*.f64 a b))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) #s(approx (+ b (* 1/2 (* (* a a) b))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (/.f64 (*.f64 b r) a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) (fma.f64 a (*.f64 (*.f64 b b) r) (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) (*.f64 b #s(approx (+ (/ r (* b (cos a))) (/ (* r (sin a)) (pow (cos a) 2))) (/.f64 r b)))) b))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (/.f64 b a))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 b b)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (/ b (cos a)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal 1/3 binary64) b))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) #s(approx (+ 1 (* -1/2 (* a a))) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 #s(literal -1 binary64) (*.f64 b #s(approx (sin a) a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a #s(approx (+ (* (* b b) r) (/ (* b r) a)) (*.f64 b (fma.f64 b r (/.f64 r a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) (fma.f64 a r (/.f64 r b))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (+ (* a (pow (tan b) 2)) (tan b)) (*.f64 a #s(approx (+ (/ (sin b) (* a (cos b))) (/ (pow (sin b) 2) (pow (cos b) 2))) (*.f64 b (+.f64 b (/.f64 #s(literal 1 binary64) a))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 #s(approx (+ (* b (/ (sin a) (pow (cos a) 2))) (pow (cos a) -1)) #s(approx (+ 1 (* a b)) (*.f64 b (+.f64 a (/.f64 #s(literal 1 binary64) b))))) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 a a)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 a (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (*.f64 b #s(approx (+ (* -1 (sin a)) (/ (cos a) b)) (/.f64 #s(literal 1 binary64) b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(literal 1 binary64)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (pow (cos a) 2))) (/ r (cos a))) b) #s(approx (+ (* a (* (* b b) r)) (* b r)) (*.f64 (*.f64 b b) #s(approx (+ (* a r) (/ r b)) (/.f64 (+.f64 r (*.f64 a (*.f64 b r))) b))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 b b))))) #s(approx (cos (+ a b)) #s(approx (+ (* (neg b) (sin a)) (cos a)) #s(literal 1 binary64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(approx (- (* 1/24 (* a a)) 1/2) (*.f64 #s(literal 1/24 binary64) (*.f64 a a)))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) #s(approx (+ 1 (* a (+ (* -1 b) (* -1/2 a)))) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a b)))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* a (- (* 1/6 (* a b)) 1/2))) (*.f64 #s(literal -1/2 binary64) a))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal -1/2 binary64) a))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 a a) #s(approx (+ 1/24 (* -1/720 (* a a))) (*.f64 #s(literal -1/720 binary64) (*.f64 a a)))) #s(literal 1/2 binary64))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r #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))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 #s(literal 1/6 binary64) (*.f64 a b)))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a #s(approx (+ (* -1 b) (* -1/2 a)) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #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(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64))))))))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) #s(approx (/ (- (pow (* (cos a) (cos b)) 3) (pow (* (sin a) (sin b)) 3)) (+ (* (* (cos a) (cos b)) (* (cos a) (cos b))) (+ (* (* (sin a) (sin b)) (* (sin a) (sin b))) (* (* (cos a) (cos b)) (* (sin a) (sin b)))))) #s(approx (+ (cos a) (* -1 (* b (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) b (*.f64 a #s(approx (- (* 1/6 (* a b)) 1/2) (*.f64 b (-.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))))))))))))
Outputs
(*.f64 r (/.f64 #s(approx (sin b) 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(approx (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 b b)))))))
Calls

5 calls:

40.0ms
a
16.0ms
b
15.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
12.0ms
r
12.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
33.3%1b
33.3%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
33.3%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
33.3%1r
33.3%1a
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes47.0ms (0.4%)

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

5 calls:

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

Compiled 19 to 24 computations (-26.3% saved)

regimes7.0ms (0.1%)

Memory
-29.0MiB live, 18.0MiB allocated; 2ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
Outputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(literal 0 binary64))))
Calls

5 calls:

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

Compiled 19 to 24 computations (-26.3% saved)

bsearch99.0ms (0.8%)

Memory
47.0MiB live, 93.0MiB allocated; 5ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
72.0ms
8.479115922881979e-14
3.576053779509906e-7
23.0ms
-3673.4814290421696
-4.403634252552461e-9
Samples
74.0ms133×1valid
10.0ms171×0valid
Compiler

Compiled 449 to 413 computations (8% saved)

Precisions
Click to see histograms. Total time spent on operations: 75.0ms
ival-sin: 59.0ms (79% of total)
ival-cos: 8.0ms (10.7% of total)
adjust: 3.0ms (4% of total)
ival-mult!: 2.0ms (2.7% of total)
ival-div!: 2.0ms (2.7% of total)
ival-add!: 1.0ms (1.3% of total)

bsearch5.0ms (0%)

Memory
-44.0MiB live, 2.1MiB allocated; 5ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
2.794438292638403e-8
0.06997825185337447
0.0ms
-2.1031753458318435e-7
-2.0110282722227863e-7
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch42.0ms (0.3%)

Memory
29.3MiB live, 78.2MiB allocated; 7ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
24.0ms
1.6095484890610622e-7
0.39459651424499304
15.0ms
-2.1031753458318125e-7
-2.223367422533739e-9
Samples
18.0ms140×1valid
11.0ms116×0valid
Compiler

Compiled 460 to 398 computations (13.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 22.0ms
ival-cos: 12.0ms (54.8% of total)
adjust: 3.0ms (13.7% of total)
ival-sin: 3.0ms (13.7% of total)
ival-mult!: 2.0ms (9.1% of total)
ival-div!: 2.0ms (9.1% of total)
ival-add!: 1.0ms (4.6% of total)

bsearch2.0ms (0%)

Memory
3.6MiB live, 3.6MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
1.6095484890610622e-7
0.39459651424499304
1.0ms
-2.1031753458318125e-7
-2.223367422533739e-9
Compiler

Compiled 460 to 398 computations (13.5% saved)

derivations319.0ms (2.5%)

Memory
-28.4MiB live, 351.1MiB allocated; 65ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 344 to 98 computations (71.5% saved)

preprocess73.0ms (0.6%)

Memory
43.7MiB live, 180.7MiB allocated; 15ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 1 394 to 566 computations (59.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...