rsin B (should all be same)

Time bar (total: 5.1s)

start0.0ms (0%)

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

analyze358.0ms (7.1%)

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

Compiled 11 to 10 computations (9.1% saved)

sample1.6s (32.3%)

Memory
-12.3MiB live, 2 032.0MiB allocated; 289ms collecting garbage
Samples
1.2s6 047×1valid
135.0ms2 209×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.0s
ival-cos: 352.0ms (34.6% of total)
ival-sin: 242.0ms (23.8% of total)
ival-add!: 146.0ms (14.4% of total)
adjust: 138.0ms (13.6% of total)
ival-div!: 71.0ms (7% of total)
ival-mult!: 67.0ms (6.6% of total)
Bogosity

explain150.0ms (3%)

Memory
12.0MiB live, 301.6MiB allocated; 26ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
61137(-1807.2064037358189 -3.1000009010999432e-204 -2.6536224037477517e+21)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))sensitivity1981
Confusion
Predicted +Predicted -
+610
-13758
Precision
0.30808080808080807
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6100
-137157
Precision?
0.3065326633165829
Recall?
1.0
Freqs
test
numberfreq
058
1198
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
85.0ms384×1valid
11.0ms128×0valid
Compiler

Compiled 69 to 28 computations (59.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-add!: 21.0ms (29.5% of total)
ival-cos: 19.0ms (26.7% of total)
ival-sin: 15.0ms (21% of total)
adjust: 8.0ms (11.2% of total)
ival-mult!: 4.0ms (5.6% of total)
ival-div!: 4.0ms (5.6% of total)

preprocess49.0ms (1%)

Memory
-20.1MiB live, 26.3MiB allocated; 5ms 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
▶79.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Symmetry

(negabs r)

Compiler

Compiled 18 to 16 computations (11.1% saved)

series23.0ms (0.4%)

Memory
4.0MiB live, 49.7MiB 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
6.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)

rewrite207.0ms (4.1%)

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

eval9.0ms (0.2%)

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

Compiled 1 746 to 431 computations (75.3% saved)

prune15.0ms (0.3%)

Memory
-15.6MiB live, 31.2MiB allocated; 3ms collecting garbage
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New542175
Fresh000
Picked101
Done000
Total552176
Accuracy
99.7%
Counts
76 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
79.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
79.0%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
▶99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
40.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶40.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
64.1%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b)))))
61.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
▶56.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
54.3%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
60.2%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
60.3%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))))
52.2%
(*.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.1%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
52.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
59.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
52.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
52.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b)))
▶61.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
▶52.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
53.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 792 to 564 computations (28.8% saved)

series89.0ms (1.8%)

Memory
-9.7MiB live, 181.8MiB allocated; 14ms collecting garbage
Counts
39 → 216
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
(*.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 (/.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) (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 a b)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b)
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a)))
(/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))))
(*.f64 (sin.f64 a) r)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))
(cos.f64 (*.f64 #s(literal 2 binary64) a))
(*.f64 #s(literal 2 binary64) a)
(/.f64 r (cos.f64 a))
Outputs
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* r (/ (sin b) (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #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) (+ 1/2 (* 1/2 (cos (* 2 a))))) #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 (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* -1 (pow a 2)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (* 2 a)) #s(hole binary64 1))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#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 (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (/ (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 (/ (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (* 1/2 (cos (* 2 a)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (cos (* 2 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) (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) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (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 (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* r (/ (sin b) (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a 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 (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (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 (* 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 (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))))
Calls

9 calls:

TimeVariablePointExpression
15.0ms
a
@-inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a 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)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) (/ r (cos a)))
12.0ms
r
@inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a 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)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) (/ r (cos a)))
11.0ms
a
@inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a 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)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) (/ r (cos a)))
8.0ms
b
@0
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a 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)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) (/ r (cos a)))
8.0ms
r
@0
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (cos (+ a 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)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))) 1/2 (* 1/2 (cos (* 2 a))) (cos (* 2 a)) (* 2 a) (/ r (cos a)))

rewrite218.0ms (4.3%)

Memory
3.6MiB live, 292.5MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010037021
010585958
159845958
086755741
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
255 → 406
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
(*.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 (/.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) (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 a b)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a))) b)
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))) (/.f64 r (cos.f64 a)))
(/.f64 (*.f64 (sin.f64 a) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))))
(*.f64 (sin.f64 a) r)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) a)))
(cos.f64 (*.f64 #s(literal 2 binary64) a))
(*.f64 #s(literal 2 binary64) a)
(/.f64 r (cos.f64 a))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (sin a) r) #s(hole binary64 (* r (sin a))))
#s(approx (/ r (cos a)) #s(hole binary64 (/ r (cos a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a)))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* r (/ (sin b) (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ r (* a (+ (* 1/2 (* a r)) (* b r))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a r)))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #s(hole binary64 (* a (+ r (* (pow a 2) (- (* -1/6 r) (* -1 r)))))))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) #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) (+ 1/2 (* 1/2 (cos (* 2 a))))) #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 (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* -1 (pow a 2)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (+ 1/2 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (* 2 a)) #s(hole binary64 1))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#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 (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (/ (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 (/ (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (* 1/2 (cos (* 2 a))) #s(hole binary64 (* 1/2 (cos (* 2 a)))))
#s(approx (cos (* 2 a)) #s(hole binary64 (cos (* 2 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) (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) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (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 (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* r (/ (sin b) (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ r (cos a))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a 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 (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* b (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (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 (* 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 (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ r (* b (cos a)))) (* -1 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))))
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 (*.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 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(sin.f64 b)
b
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 a 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))))))
(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))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (+.f64 a b)))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.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)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (+.f64 a b)))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 b))) (cos.f64 (-.f64 a (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 b) #s(literal 0 binary64) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) #s(literal 0 binary64)) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
a
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(sin.f64 a)
(*.f64 #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b)) r)
(*.f64 r #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)))) (tan.f64 b))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))
(/.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 (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) a))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 #s(approx (+ a b) a)) #s(literal 0 binary64) (*.f64 (cos.f64 #s(approx (+ a b) a)) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) a))))
(cos.f64 (neg.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) a)) #s(literal 0 binary64)) (*.f64 (cos.f64 #s(approx (+ a b) a)) #s(literal 1 binary64)))
#s(approx (+ a b) a)
(*.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 (*.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 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 a 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))))))
(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))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (+.f64 a b)))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.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)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (+.f64 a b)))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(/.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)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b)))
(neg.f64 (+.f64 a b))
(fma.f64 #s(literal -1 binary64) a (neg.f64 b))
(fma.f64 a #s(literal -1 binary64) (neg.f64 b))
(+.f64 (neg.f64 a) (neg.f64 b))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(+.f64 a b)
(+.f64 b a)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
(*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b)
(*.f64 b (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
(fma.f64 (/.f64 r (cos.f64 a)) b (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b))
(fma.f64 b (/.f64 r (cos.f64 a)) (*.f64 b (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (/.f64 r (cos.f64 a)) b) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b))
(+.f64 (*.f64 b (/.f64 r (cos.f64 a))) (*.f64 b (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a)))) (-.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
(/.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a))) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a))) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))))
(/.f64 (+.f64 (pow.f64 (/.f64 r (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 r (cos.f64 a)) (/.f64 r (cos.f64 a)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 a) (*.f64 (*.f64 (sin.f64 a) r) b))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b (/.f64 r (cos.f64 a)))
(fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a)))
(+.f64 (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a)))
(+.f64 (/.f64 r (cos.f64 a)) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) r)) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 a) r)
(*.f64 r (sin.f64 a))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 1 binary64)) (pow.f64 (cos.f64 a) #s(literal 1 binary64)))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) a)) (cos.f64 (-.f64 (neg.f64 a) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 a))) (cos.f64 (-.f64 a (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a a)) (cos.f64 (-.f64 a a))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 a a)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 a))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 a a))))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 a)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 a a)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a a)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1 binary64)))
(-.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a a))))
(cos.f64 (neg.f64 (+.f64 a a)))
(cos.f64 (+.f64 a a))
(+.f64 (*.f64 (sin.f64 (+.f64 a a)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(+.f64 a a)
(/.f64 (neg.f64 r) (neg.f64 (cos.f64 a)))
(/.f64 r (cos.f64 a))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx r r)
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (sin a) r) (*.f64 (sin.f64 a) r))
#s(approx (/ r (cos a)) (/.f64 r (cos.f64 a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (neg.f64 (*.f64 (*.f64 b r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (neg.f64 r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.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)))) (fma.f64 a (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #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)))) a)) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (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))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.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)) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 a a)) (sin.f64 b) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal 1/120 binary64) (*.f64 (sin.f64 b) #s(literal -1/6 binary64))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 b) (*.f64 (fma.f64 #s(literal 1/120 binary64) (sin.f64 b) (*.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 a a)) (sin.f64 b))) (*.f64 a a))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.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)))) (fma.f64 a (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #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)))) a)) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (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))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.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)) (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal 3 binary64))))))) (neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal 3 binary64))))))) a) (neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 a (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (/.f64 (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal 3 binary64))))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal 3 binary64)))))) a) (neg.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) a) #s(literal -1/2 binary64) (neg.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) a (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)) #s(literal -1/2 binary64))) a (neg.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) a (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 a)) b))
#s(approx (neg (+ a b)) (neg.f64 b))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 a) b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) b) a (*.f64 (*.f64 b r) #s(literal 1/2 binary64))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) r)
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) a (*.f64 #s(literal 1/2 binary64) r)) a (*.f64 b r)) a r))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 a r))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 (fma.f64 (*.f64 r #s(literal 5/6 binary64)) (*.f64 a a) r) a))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal 1/3 binary64) r (neg.f64 (*.f64 r #s(literal 5/6 binary64))))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) r)) (neg.f64 r)) (*.f64 a a) r) a))
#s(approx (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a))))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) r) (neg.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) r) (fma.f64 #s(literal 1/3 binary64) r (neg.f64 (*.f64 r #s(literal 5/6 binary64))))))) (fma.f64 #s(literal -2/45 binary64) r (*.f64 #s(literal 1/3 binary64) (*.f64 r #s(literal 5/6 binary64))))) (*.f64 a a) (*.f64 #s(literal 1/120 binary64) r)) (fma.f64 #s(literal 1/3 binary64) r (neg.f64 (*.f64 r #s(literal 5/6 binary64))))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) r)) (neg.f64 r)) (*.f64 a a) r) a))
#s(approx (* (sin a) r) (*.f64 a r))
#s(approx (* (sin a) r) (*.f64 (fma.f64 (*.f64 (*.f64 a a) r) #s(literal -1/6 binary64) r) a))
#s(approx (* (sin a) r) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 a a) r) a))
#s(approx (* (sin a) r) (*.f64 (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (*.f64 (*.f64 a a) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 a a) r) a))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (+.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 a a) #s(literal 1/3 binary64)) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 a))) (+.f64 (neg.f64 (*.f64 a a)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 a a) #s(literal 1/3 binary64)) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 a)) #s(literal 1 binary64))
#s(approx (cos (* 2 a)) (fma.f64 #s(literal -2 binary64) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (* 2 a)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (* 2 a)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 a a) #s(literal 2/3 binary64)) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (* 2 a) (+.f64 a a))
#s(approx (/ r (cos a)) r)
#s(approx (/ r (cos a)) (fma.f64 (*.f64 (*.f64 a a) r) #s(literal 1/2 binary64) r))
#s(approx (/ r (cos a)) (fma.f64 (fma.f64 (neg.f64 (*.f64 a a)) (*.f64 r #s(literal -5/24 binary64)) (*.f64 #s(literal 1/2 binary64) r)) (*.f64 a a) r))
#s(approx (/ r (cos a)) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (fma.f64 #s(literal -1/720 binary64) r (fma.f64 #s(literal 1/48 binary64) r (*.f64 (*.f64 r #s(literal -5/24 binary64)) #s(literal 1/2 binary64))))) (*.f64 r #s(literal -5/24 binary64))) (*.f64 a a) (*.f64 #s(literal 1/2 binary64) r)) (*.f64 a a) r))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (/ (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 (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (PI.f64) a) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 b a)) a))
#s(approx (neg (+ a b)) (neg.f64 a))
#s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64)) a))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 a))) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 a)) (cos.f64 (+.f64 a a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (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 b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 a)) b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 a)) b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 a)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a)) #s(literal 1 binary64))))
#s(approx (neg (+ a b)) (*.f64 (neg.f64 a) (+.f64 (/.f64 b a) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#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 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) 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 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #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 b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 (sin.f64 a) #s(literal -1/6 binary64))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 a) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 (sin.f64 a) #s(literal 1/120 binary64))) (*.f64 b b))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#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 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))) (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) r) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (/.f64 (-.f64 (*.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) r) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))) (-.f64 (*.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) r) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal 3 binary64))))))) b) (neg.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 b (/.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))) (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b) (/.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))))) b (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) (pow.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))) b) (/.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))))) b (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) b) #s(literal -1/2 binary64) (neg.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)) #s(literal -1/2 binary64))) b (neg.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) b (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 b)) a))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 b) a))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a)))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 a b)) b))
#s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (/.f64 (*.f64 (*.f64 (*.f64 b b) r) (sin.f64 a)) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (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))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 b)) a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 b)) a))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 b)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b)) #s(literal 1 binary64))))
#s(approx (neg (+ a b)) (*.f64 (neg.f64 b) (+.f64 (/.f64 a b) #s(literal 1 binary64))))
#s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (neg.f64 r) (*.f64 (cos.f64 a) b)))))

eval51.0ms (1%)

Memory
22.4MiB live, 114.5MiB allocated; 7ms collecting garbage
Compiler

Compiled 12 384 to 2 121 computations (82.9% saved)

prune55.0ms (1.1%)

Memory
-27.0MiB live, 87.6MiB allocated; 39ms collecting garbage
Pruning

40 alts after pruning (38 fresh and 2 done)

PrunedKeptTotal
New33930369
Fresh8816
Picked325
Done000
Total35040390
Accuracy
99.7%
Counts
390 → 40
Alt Table
Click to see full alt table
StatusAccuracyProgram
79.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
56.7%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
61.8%
(*.f64 #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b)) r)
79.0%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 (+.f64 a b))))
▶99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
39.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64)) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
66.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a)))))
63.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
58.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
40.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶39.4%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
34.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
8.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
16.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
61.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
✓56.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
54.3%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
60.2%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
60.3%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))))
52.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 #s(approx (+ a b) a))))
53.1%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
52.9%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
35.4%
(*.f64 r #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
52.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
59.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
31.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
▶31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
31.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
▶35.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
40.3%
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))))
40.1%
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
52.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
26.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r)) b))
33.7%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
53.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
33.8%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
36.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
▶52.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
Compiler

Compiled 1 887 to 1 343 computations (28.8% saved)

series100.0ms (2%)

Memory
6.0MiB live, 195.9MiB allocated; 15ms collecting garbage
Counts
40 → 211
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b))
#s(approx (tan b) b)
(*.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))
(PI.f64)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (+ a b) a)
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
(*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 b r)
(fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (+.f64 a a))
(+.f64 a a)
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 a))
#s(literal 1 binary64)
Outputs
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (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 (* 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 (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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 r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b r)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (* r (- (* -1/6 b) (* -1 b))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 a))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 1))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (+ a a)) #s(hole binary64 1))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (+ a a) #s(hole binary64 (* 2 a)))
#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 (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (sin b) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#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 (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (cos (+ a a)) #s(hole binary64 (cos (* 2 a))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (/ 1 (cos 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 (* 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 (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (/ (sin a) (+ 1/2 (* 1/2 (cos (neg (* -2 a))))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))
#s(approx (cos (+ a a)) #s(hole binary64 (cos (neg (* -2 a)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (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 (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 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 (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 (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 (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#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 (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (/ 1 (cos a))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos 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 (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) 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 (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (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 (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#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 (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (* b (cos a))))))))
Calls

9 calls:

TimeVariablePointExpression
23.0ms
b
@inf
((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (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)) (+ a b) (/ (PI) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ 1 (cos a)) 1)
11.0ms
b
@-inf
((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (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)) (+ a b) (/ (PI) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ 1 (cos a)) 1)
11.0ms
b
@0
((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (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)) (+ a b) (/ (PI) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ 1 (cos a)) 1)
10.0ms
a
@inf
((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (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)) (+ a b) (/ (PI) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ 1 (cos a)) 1)
9.0ms
a
@-inf
((* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan b) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) (+ (+ b (PI)) (PI)) (+ b (PI)) (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)) (+ a b) (/ (PI) 2) 2 (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ 1 (cos a)) 1)

rewrite211.0ms (4.2%)

Memory
-12.4MiB live, 312.1MiB allocated; 21ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010257129
010715997
161635826
087685479
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
251 → 421
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
r
(/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b))
#s(approx (tan b) b)
(*.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))
(PI.f64)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (+ a b) a)
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
(*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 b r)
(fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (+.f64 a a))
(+.f64 a a)
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 a))
#s(literal 1 binary64)
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (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 (* 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 (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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 r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b r)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* b (* r (- (* -1/6 b) (* -1 b))))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 1))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ 1 (* a b))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ 1 (* a (+ b (* 1/2 a))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ 1 (* a (+ b (* a (+ 1/2 (* a (- (* -1/6 b) (* -1 b))))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 a))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (* a (+ 1 (* 5/6 (pow a 2))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* 61/120 (pow a 2))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (+ 5/6 (* (pow a 2) (+ 61/120 (* 277/1008 (pow a 2))))))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 1))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (+ a a)) #s(hole binary64 1))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (+ a a) #s(hole binary64 (* 2 a)))
#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 (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (sin b) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#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 (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (cos (+ a a)) #s(hole binary64 (cos (* 2 a))))
#s(approx (/ 1 (cos a)) #s(hole binary64 (/ 1 (cos 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 (* 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 (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (/ (sin a) (+ 1/2 (* 1/2 (cos (neg (* -2 a))))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))
#s(approx (cos (+ a a)) #s(hole binary64 (cos (neg (* -2 a)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (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)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (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 (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 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 (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 (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 (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#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 (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (/ 1 (cos a))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos 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 (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) 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 (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (* b (+ (/ 1 (* b (cos a))) (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (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 (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#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 (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(hole binary64 (* -1 (* b (- (* -1 (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (* b (cos a))))))))
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 (*.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 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(sin.f64 b)
b
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (cos.f64 (+.f64 (neg.f64 b) a)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(sin.f64 (+.f64 (neg.f64 (-.f64 a (neg.f64 b))) (/.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 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 a b)))
(fma.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1 binary64) b))) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1 binary64) b))))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 a (neg.f64 b)))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (sin.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 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.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))))
(fma.f64 (sin.f64 b) #s(literal 0 binary64) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) #s(literal 0 binary64)) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
a
(*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (sin.f64 a) (neg.f64 (sin.f64 b)))
(/.f64 (+.f64 (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) b) a)) (cos.f64 (+.f64 (+.f64 (PI.f64) b) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (+.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a (+.f64 (PI.f64) b))) (cos.f64 (+.f64 a (+.f64 (PI.f64) b)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(neg.f64 (sin.f64 b))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (PI.f64) b))
(sin.f64 (neg.f64 b))
(fma.f64 #s(literal 0 binary64) (cos.f64 b) (neg.f64 (sin.f64 b)))
(fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(fma.f64 (sin.f64 b) #s(literal -1 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 b) #s(literal 0 binary64)) (*.f64 (sin.f64 b) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 b)) (neg.f64 (sin.f64 b)))
(+.f64 (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(sin.f64 a)
(*.f64 #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(approx (tan (+ (+ b (PI)) (PI))) b)) r)
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(approx (tan (+ (+ b (PI)) (PI))) b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(approx (tan (+ (+ b (PI)) (PI))) b))
#s(approx (tan (+ (+ b (PI)) (PI))) b)
(*.f64 #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (tan.f64 b)) r)
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (tan.f64 b))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 b)))) (neg.f64 (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 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)))
(tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 b)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (PI.f64)))) (-.f64 b (+.f64 (PI.f64) (PI.f64))))
(/.f64 (-.f64 (*.f64 (+.f64 (PI.f64) b) (+.f64 (PI.f64) b)) (*.f64 (PI.f64) (PI.f64))) (-.f64 (+.f64 (PI.f64) b) (PI.f64)))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (PI.f64))) (*.f64 b (+.f64 (PI.f64) (PI.f64))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (PI.f64) b) #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 (+.f64 (PI.f64) b) (+.f64 (PI.f64) b) (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 (PI.f64) b) (PI.f64)))))
(fma.f64 (PI.f64) #s(literal 2 binary64) b)
(fma.f64 #s(literal 2 binary64) (PI.f64) b)
(-.f64 b (*.f64 #s(literal -2 binary64) (PI.f64)))
(+.f64 (+.f64 (PI.f64) (PI.f64)) b)
(+.f64 (+.f64 (PI.f64) b) (PI.f64))
(+.f64 (PI.f64) (+.f64 (PI.f64) b))
(+.f64 b (+.f64 (PI.f64) (PI.f64)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (-.f64 b (PI.f64)))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 b (PI.f64)))))
(+.f64 (PI.f64) b)
(+.f64 b (PI.f64))
(PI.f64)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) a))))
(/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(approx (+ a b) a)))
(fma.f64 (sin.f64 #s(approx (+ a b) a)) #s(literal 0 binary64) (*.f64 (cos.f64 #s(approx (+ a b) a)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) a)) (*.f64 #s(literal 0 binary64) (sin.f64 #s(approx (+ a b) a))))
(cos.f64 (neg.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) a))) (*.f64 #s(literal 0 binary64) (sin.f64 #s(approx (+ a b) a))))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) a)) #s(literal 0 binary64)) (*.f64 (cos.f64 #s(approx (+ a b) a)) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(approx (+ a b) a) #s(approx (+ a b) a)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ a b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(approx (+ a b) a) #s(approx (+ a b) a) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(approx (+ a b) a))
(+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (+ a b) a)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 b r)))
(*.f64 (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r) b)
(*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 b r))
(*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 b (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r))
(fma.f64 (*.f64 b r) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b r) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(fma.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b r) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
(+.f64 (*.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b r)) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (*.f64 b r)))
(+.f64 (*.f64 (*.f64 b r) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 b r) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 b r)
(*.f64 r b)
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (-.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (cos.f64 a)) (-.f64 (*.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 a) (*.f64 (sin.f64 a) b))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))
(fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) b (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(+.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (sin.f64 a)) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (cos.f64 (+.f64 a a)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 1 binary64)) (pow.f64 (cos.f64 a) #s(literal 1 binary64)))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) a)) (cos.f64 (-.f64 (neg.f64 a) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 a))) (cos.f64 (-.f64 a (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a a)) (cos.f64 (-.f64 a a))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 a))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 a a))))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 a)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a a)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1 binary64)))
(-.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a a))))
(cos.f64 (neg.f64 (+.f64 a a)))
(cos.f64 (*.f64 #s(literal -2 binary64) a))
(cos.f64 (+.f64 a a))
(+.f64 (*.f64 (sin.f64 (+.f64 a a)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1 binary64)))
(*.f64 #s(literal -2 binary64) (neg.f64 a))
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 a a) (*.f64 a a)) (-.f64 a a))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 a a (-.f64 (*.f64 a a) (*.f64 a a))))
(neg.f64 (*.f64 #s(literal -2 binary64) a))
(+.f64 a a)
#s(literal 1/2 binary64)
(pow.f64 (cos.f64 a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (cos.f64 a))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 binary64)))
#s(literal 1 binary64)
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx r r)
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 b r)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 b r)))
#s(approx (* b r) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (neg.f64 (*.f64 (*.f64 b r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 a (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #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)))) a)) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (fma.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 a) (sin.f64 b)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 a a)) (sin.f64 b) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/120 binary64) (*.f64 (sin.f64 b) #s(literal 1/6 binary64))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 b) (*.f64 (fma.f64 #s(literal -1/120 binary64) (sin.f64 b) (*.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 a a)) (sin.f64 b))) (*.f64 a a))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 a (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #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)))) a)) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 r (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (sin.f64 b)) a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (*.f64 r (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64))))))) (/.f64 (*.f64 (*.f64 r (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 r (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))) #s(literal 1/3 binary64) (neg.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (*.f64 r (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64)))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))) a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (*.f64 r (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64))))))) a) (/.f64 (*.f64 (*.f64 r (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) a) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))))) (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))))) a (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))) #s(literal 1/3 binary64) (neg.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))) a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64)))))) a) (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))))) a (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) a (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 a (fma.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) a) #s(literal -1/2 binary64) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 a (fma.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) a) #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal -1/2 binary64))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) a (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) b) a (*.f64 (*.f64 b r) #s(literal 1/2 binary64))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (*.f64 b r))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b #s(literal 5/6 binary64)) r) b) a (*.f64 (*.f64 b r) #s(literal 1/2 binary64))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) #s(literal 1 binary64))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 a b #s(literal 1 binary64)))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) a b) a #s(literal 1 binary64)))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 b #s(literal 5/6 binary64)) a #s(literal 1/2 binary64)) a b) a #s(literal 1 binary64)))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) a)
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (*.f64 (fma.f64 #s(literal 5/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (*.f64 (fma.f64 (fma.f64 #s(literal 61/120 binary64) (*.f64 a a) #s(literal 5/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 277/1008 binary64) (*.f64 a a) #s(literal 61/120 binary64)) (*.f64 a a) #s(literal 5/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(literal 1 binary64))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (+.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 a a) #s(literal 1/3 binary64)) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (+ a a)) #s(literal 1 binary64))
#s(approx (cos (+ a a)) (fma.f64 #s(literal -2 binary64) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (+ a a)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (+ a a)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 a a) #s(literal 2/3 binary64)) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ a a) (+.f64 a a))
#s(approx (/ 1 (cos a)) #s(literal 1 binary64))
#s(approx (/ 1 (cos a)) (fma.f64 (*.f64 a a) #s(literal 1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ 1 (cos a)) (fma.f64 (fma.f64 #s(literal 5/24 binary64) (*.f64 a a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ 1 (cos a)) (fma.f64 (fma.f64 (fma.f64 #s(literal 61/720 binary64) (*.f64 a a) #s(literal 5/24 binary64)) (*.f64 a a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a)))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a) #s(literal 1 binary64)) a))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (cos (+ a a)) (cos.f64 (+.f64 a a)))
#s(approx (/ 1 (cos a)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) (neg.f64 a)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) (neg.f64 a)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) (neg.f64 a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a)) #s(literal 1 binary64))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (*.f64 b r)))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2)) (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (cos (+ a a)) (cos.f64 (+.f64 a a)))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) 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 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #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 b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (fma.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 b) (sin.f64 a)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (sin.f64 a) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/120 binary64) (*.f64 (sin.f64 a) #s(literal 1/6 binary64))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (sin.f64 a) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/5040 binary64) (*.f64 (sin.f64 a) #s(literal -1/120 binary64))) (*.f64 b b))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (neg (sin b)) (neg.f64 b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (tan (+ (+ b (PI)) (PI))) b)
#s(approx (tan (+ (+ b (PI)) (PI))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan (+ (+ b (PI)) (PI))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan (+ (+ b (PI)) (PI))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 #s(literal 1 binary64) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 (-.f64 (fma.f64 (fma.f64 (neg.f64 b) #s(literal -1/3 binary64) #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (+ b (PI)) (PI)) (+.f64 (PI.f64) (PI.f64)))
#s(approx (+ (+ b (PI)) (PI)) (fma.f64 (PI.f64) #s(literal 2 binary64) b))
#s(approx (+ b (PI)) (PI.f64))
#s(approx (+ b (PI)) (+.f64 (PI.f64) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 b r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (+.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) r) b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) r) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64)))))) b) (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))))) b (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/6 binary64) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))) #s(literal -1/6 binary64) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) r) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64)))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (*.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))) #s(literal 1/2 binary64)))) b))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) r) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64)))))) b) (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) r) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))))) b (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (neg.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b) (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))))) b (/.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))) b) (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))))) b (/.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 b (fma.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) b) #s(literal -1/2 binary64) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 b (fma.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) b) #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal -1/2 binary64))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 b))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 b))
#s(approx (+ (+ b (PI)) (PI)) b)
#s(approx (+ (+ b (PI)) (PI)) (*.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal 2 binary64) #s(literal 1 binary64)) b))
#s(approx (+ b (PI)) b)
#s(approx (+ b (PI)) (*.f64 (+.f64 (/.f64 (PI.f64) b) #s(literal 1 binary64)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) b) #s(literal 1 binary64)) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) (*.f64 b b)) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (/.f64 (*.f64 (*.f64 (sin.f64 a) r) (*.f64 b b)) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* b r) (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a)))) (*.f64 (fma.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) b)) (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) b))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 (-.f64 (+.f64 (PI.f64) (PI.f64)) (neg.f64 b))))
#s(approx (+ (+ b (PI)) (PI)) (*.f64 (neg.f64 b) (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal -2 binary64)) #s(literal 1 binary64))))
#s(approx (+ b (PI)) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (PI.f64) b)) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) (neg.f64 b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) (neg.f64 b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) (neg.f64 b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) b)) #s(literal 1 binary64))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) b)))))

eval56.0ms (1.1%)

Memory
27.0MiB live, 130.3MiB allocated; 9ms collecting garbage
Compiler

Compiled 15 678 to 2 354 computations (85% saved)

prune42.0ms (0.8%)

Memory
11.0MiB live, 104.8MiB allocated; 4ms collecting garbage
Pruning

53 alts after pruning (48 fresh and 5 done)

PrunedKeptTotal
New38320403
Fresh52833
Picked235
Done022
Total39053443
Accuracy
99.8%
Counts
443 → 53
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶79.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
56.7%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
61.8%
(*.f64 #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b)) r)
79.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) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
66.2%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
39.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64)) (*.f64 (sin.f64 b) (sin.f64 a)))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
66.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a)))))
63.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
58.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
29.4%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (/.f64 (+.f64 (pow.f64 #s(approx (+ a b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(approx (+ a b) a) #s(approx (+ a b) a) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
34.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
33.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) b) #s(literal 1 binary64)) b)))))
7.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
16.4%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
8.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
16.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
61.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
✓56.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
54.3%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
60.2%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
53.1%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
52.9%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
35.4%
(*.f64 r #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
36.0%
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))
52.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
59.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
31.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
▶31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))))
31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)))))
16.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (-.f64 b (PI.f64))) (PI.f64)))))
31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)) (PI.f64)))))
31.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (PI.f64) b))))
6.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 #s(approx (+ b (PI)) (PI.f64)) (PI.f64)))))
▶17.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))
✓35.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
40.3%
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))))
40.1%
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
40.0%
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
52.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
26.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r)) b))
53.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
33.8%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
▶36.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
✓52.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
38.2%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 binary64)))))))
52.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) #s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
28.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) a b) a #s(literal 1 binary64))))))
33.7%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 a b #s(literal 1 binary64))))))
53.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
Compiler

Compiled 2 722 to 1 912 computations (29.8% saved)

series65.0ms (1.3%)

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

9 calls:

TimeVariablePointExpression
11.0ms
r
@0
((* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (* (PI) 2) b)) (+ (* (PI) 2) b) (PI) 2 (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ r (* (cos a) b)) (* (cos a) b) (* b b))
10.0ms
r
@-inf
((* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (* (PI) 2) b)) (+ (* (PI) 2) b) (PI) 2 (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ r (* (cos a) b)) (* (cos a) b) (* b b))
7.0ms
r
@inf
((* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (* (PI) 2) b)) (+ (* (PI) 2) b) (PI) 2 (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ r (* (cos a) b)) (* (cos a) b) (* b b))
6.0ms
a
@-inf
((* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (* (PI) 2) b)) (+ (* (PI) 2) b) (PI) 2 (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ r (* (cos a) b)) (* (cos a) b) (* b b))
6.0ms
b
@inf
((* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (+ b (PI)) (PI))) 0 (* r (/ (sin b) (cos (+ a b)))) (/ (sin b) (cos (+ a b))) (tan (+ (* (PI) 2) b)) (+ (* (PI) 2) b) (PI) 2 (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (cos (+ a b)) (+ a b) (* r (/ (sin b) (cos (+ a b)))) (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (+ (* (cos (+ a a)) 1/2) 1/2) (cos (+ a a)) (+ a a) 1/2 (/ r (* (cos a) b)) (* (cos a) b) (* b b))

rewrite190.0ms (3.8%)

Memory
7.7MiB live, 295.7MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08456400
08945393
149055015
083454814
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
237 → 428
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))))
r
(/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))))
#s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b)))
(tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))
(fma.f64 (PI.f64) #s(literal 2 binary64) b)
(PI.f64)
#s(literal 2 binary64)
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(cos.f64 (+.f64 a b))
(+.f64 a b)
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
(*.f64 (fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))
(fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b)))
(/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (+.f64 a a))
(+.f64 a a)
#s(literal 1/2 binary64)
(/.f64 r (*.f64 (cos.f64 a) b))
(*.f64 (cos.f64 a) b)
(*.f64 b b)
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx r #s(hole binary64 r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (/ (* (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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (* r (+ (/ 1 (cos a)) (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (* (pow b 2) (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a))))))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (* r (+ (/ 1 (* b (cos a))) (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (/ r (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (/ r (* (cos a) b)) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (/ (* b (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (cos a))))))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (* -1 (* (pow b 2) (* r (- (* -1 (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (* b (cos a)))))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (* -1 (* r (- (* -1 (/ (sin a) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 1 (* b (cos a))))))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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 (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (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 a #s(hole binary64 a))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (* 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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ 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 (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (* b r)))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* b r))) (* (pow b 2) r))) (* b r))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/2 (* b r)) (* a (* (pow b 2) (- (* -1/6 r) (* -1 r)))))) (* (pow b 2) r))) (* b r))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (/ r b)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (+ (* a r) (/ r b))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (+ (* a (+ r (* 1/2 (/ (* a r) b)))) (/ r b))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (+ (* a (+ r (* a (- (* a (- (* -1/6 r) (* -1 r))) (* -1/2 (/ r b)))))) (/ r b))))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 r))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (+ r (* (pow a 2) r))))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (+ r (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1 r) (* 1/3 r)))) (* -1 r))))))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (+ r (* (pow a 2) (- (* (pow a 2) (- (* -1 (* (pow a 2) (+ (* -1 r) (+ (* -2/45 r) (* 2/3 r))))) (+ (* -1 r) (* 1/3 r)))) (* -1 r))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 1))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* -1 (pow a 2)))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/3 (pow a 2)) 1)))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/3 (* -2/45 (pow a 2)))) 1)))))
#s(approx (cos (+ a a)) #s(hole binary64 1))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* -2 (pow a 2)))))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 2/3 (pow a 2)) 2)))))
#s(approx (cos (+ a a)) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 2/3 (* -4/45 (pow a 2)))) 2)))))
#s(approx (+ a a) #s(hole binary64 (* 2 a)))
#s(approx (/ r (* (cos a) b)) #s(hole binary64 (/ r b)))
#s(approx (/ r (* (cos a) b)) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) r) b)) (/ r b))))
#s(approx (/ r (* (cos a) b)) #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 (* (cos a) b)) #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 (* (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 b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (sin b) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (/ (sin b) (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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a))))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 a))))))
#s(approx (cos (+ a a)) #s(hole binary64 (cos (* 2 a))))
#s(approx (* (cos a) b) #s(hole binary64 (* b (cos 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 (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (neg (* -2 a))))))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) #s(hole binary64 (/ r (+ 1/2 (* 1/2 (cos (neg (* -2 a))))))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(hole binary64 (+ 1/2 (* 1/2 (cos (neg (* -2 a)))))))
#s(approx (cos (+ a a)) #s(hole binary64 (cos (neg (* -2 a)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#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 (* 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 (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 (tan (+ (* (PI) 2) b)) #s(hole binary64 (/ (sin (* 2 (PI))) (cos (* 2 (PI))))))
#s(approx (tan (+ (* (PI) 2) b)) #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 (+ (* (PI) 2) b)) #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 (+ (* (PI) 2) b)) #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 (+ (* (PI) 2) b) #s(hole binary64 (* 2 (PI))))
#s(approx (+ (* (PI) 2) b) #s(hole binary64 (+ b (* 2 (PI)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b r)))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (sin b) r) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (/ r (* b (cos a)))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (/ (+ (/ r (cos a)) (/ (* b (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))) b)))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (+ b (* 2 (PI)))) (cos (+ b (* 2 (PI)))))))
#s(approx (tan (+ (* (PI) 2) b)) #s(hole binary64 (/ (sin (+ b (* 2 (PI)))) (cos (+ b (* 2 (PI)))))))
#s(approx (+ (* (PI) 2) b) #s(hole binary64 b))
#s(approx (+ (* (PI) 2) b) #s(hole binary64 (* b (+ 1 (* 2 (/ (PI) b))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) #s(hole binary64 (* (pow b 2) (+ (/ r (* b (cos a))) (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) #s(hole binary64 (/ (* (pow b 2) (* r (sin a))) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) #s(hole binary64 (/ (* r (sin a)) (+ 1/2 (* 1/2 (cos (* 2 a)))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(hole binary64 (/ (sin (- (* 2 (PI)) (* -1 b))) (cos (- (* 2 (PI)) (* -1 b))))))
#s(approx (tan (+ (* (PI) 2) b)) #s(hole binary64 (/ (sin (- (* 2 (PI)) (* -1 b))) (cos (- (* 2 (PI)) (* -1 b))))))
#s(approx (+ (* (PI) 2) b) #s(hole binary64 (* -1 (* b (- (* -2 (/ (PI) b)) 1)))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (-.f64 (neg.f64 b) a))) r)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (-.f64 (neg.f64 b) a))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (-.f64 (neg.f64 b) a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 (neg.f64 b) a)))
r
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (-.f64 (neg.f64 b) a))))
(/.f64 (sin.f64 b) (cos.f64 (-.f64 (neg.f64 b) a)))
(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 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(sin.f64 (+.f64 (neg.f64 (-.f64 a (neg.f64 b))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (-.f64 a (neg.f64 b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 (neg.f64 b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1 binary64) b))) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1 binary64) b))))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 a (neg.f64 b)))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(+.f64 (*.f64 (sin.f64 (-.f64 a (neg.f64 b))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 (neg.f64 b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
a
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(neg.f64 (sin.f64 b))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (neg.f64 b))
(sin.f64 (+.f64 (PI.f64) b))
(fma.f64 #s(literal 0 binary64) (cos.f64 b) (neg.f64 (sin.f64 b)))
(fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(fma.f64 (sin.f64 b) #s(literal -1 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 b)) (neg.f64 (sin.f64 b)))
(+.f64 (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(pow.f64 (cos.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64)))
(sin.f64 (+.f64 (neg.f64 b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(sin.f64 (+.f64 (neg.f64 a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))) r)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))
#s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)) r)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (tan.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 (neg.f64 (neg.f64 (sin.f64 b)))) (neg.f64 (neg.f64 (neg.f64 (cos.f64 b)))))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (PI.f64) b) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (PI.f64) b) (PI.f64)))
(tan.f64 (fma.f64 #s(literal 2 binary64) (PI.f64) b))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 b)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (PI.f64)))) (-.f64 b (+.f64 (PI.f64) (PI.f64))))
(/.f64 (-.f64 (*.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (PI.f64))) (*.f64 b b)) (-.f64 (+.f64 (PI.f64) (PI.f64)) b))
(/.f64 (-.f64 (*.f64 (+.f64 (PI.f64) b) (+.f64 (PI.f64) b)) (*.f64 (PI.f64) (PI.f64))) (-.f64 (+.f64 (PI.f64) b) (PI.f64)))
(/.f64 (fma.f64 (*.f64 b b) b (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (fma.f64 b b (-.f64 (*.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (PI.f64))) (*.f64 b (+.f64 (PI.f64) (PI.f64))))))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 b b) b)) (fma.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 (+.f64 (PI.f64) (PI.f64)) b))))
(/.f64 (fma.f64 (*.f64 (+.f64 (PI.f64) b) (+.f64 (PI.f64) b)) (+.f64 (PI.f64) b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (fma.f64 (+.f64 (PI.f64) b) (+.f64 (PI.f64) b) (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 (PI.f64) b) (PI.f64)))))
(fma.f64 #s(literal 2 binary64) (PI.f64) b)
(fma.f64 (PI.f64) #s(literal 2 binary64) b)
(-.f64 b (*.f64 #s(literal -2 binary64) (PI.f64)))
(+.f64 (+.f64 (PI.f64) (PI.f64)) b)
(+.f64 (+.f64 (PI.f64) b) (PI.f64))
(+.f64 (PI.f64) (+.f64 (PI.f64) b))
(+.f64 b (+.f64 (PI.f64) (PI.f64)))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(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))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.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 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(+.f64 a b)
(+.f64 b a)
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
(*.f64 (*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) b) b)
(*.f64 (*.f64 b b) (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))))
(*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))
(fma.f64 (/.f64 r (*.f64 (cos.f64 a) b)) (*.f64 b b) (*.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b b)))
(fma.f64 (*.f64 b b) (/.f64 r (*.f64 (cos.f64 a) b)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (/.f64 r (*.f64 (cos.f64 a) b)) (*.f64 b b)) (*.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b b)))
(+.f64 (*.f64 (*.f64 b b) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 (*.f64 b b) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 r (*.f64 (cos.f64 a) b)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 r (*.f64 (cos.f64 a) b)) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 r (*.f64 (cos.f64 a) b)) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))))
(/.f64 (+.f64 (pow.f64 (/.f64 r (*.f64 (cos.f64 a) b)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 r (*.f64 (cos.f64 a) b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 r (*.f64 (cos.f64 a) b)) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 r (*.f64 (cos.f64 a) b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 r (*.f64 (cos.f64 a) b)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b))))))
(/.f64 (fma.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 a) b) (*.f64 (sin.f64 a) r))) (*.f64 (*.f64 (cos.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b)))
(fma.f64 (sin.f64 a) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b)))
(fma.f64 r (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b)))
(+.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (*.f64 (cos.f64 a) b)))
(+.f64 (/.f64 r (*.f64 (cos.f64 a) b)) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 r) (neg.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (log.f64 (cos.f64 a))) (exp.f64 (log.f64 (cos.f64 a))))
(*.f64 (+.f64 (cos.f64 (+.f64 a a)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (cos.f64 a) (cos.f64 a))
(pow.f64 (exp.f64 (log.f64 (cos.f64 a))) #s(literal 2 binary64))
(pow.f64 (cos.f64 a) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) a)) (cos.f64 (-.f64 (neg.f64 a) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 a))) (cos.f64 (-.f64 a (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a a)) (cos.f64 (-.f64 a a))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 a a)) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 a a)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -2 binary64)))
(fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (sin.f64 a)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 a a))))
(exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 a)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 a a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a a))))
(cos.f64 (neg.f64 (+.f64 a a)))
(cos.f64 (*.f64 #s(literal -2 binary64) a))
(cos.f64 (+.f64 a a))
(+.f64 (*.f64 (sin.f64 (+.f64 a a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 a))
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 a a) (*.f64 a a)) (-.f64 a a))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 a a) a)) (fma.f64 a a (-.f64 (*.f64 a a) (*.f64 a a))))
(neg.f64 (*.f64 #s(literal -2 binary64) a))
(+.f64 a a)
#s(literal 1/2 binary64)
(/.f64 (/.f64 r b) (cos.f64 a))
(/.f64 (neg.f64 r) (neg.f64 (*.f64 (cos.f64 a) b)))
(/.f64 (/.f64 r (cos.f64 a)) b)
(/.f64 r (*.f64 (cos.f64 a) b))
(*.f64 (cos.f64 a) b)
(*.f64 b (cos.f64 a))
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(*.f64 (fabs.f64 b) (fabs.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 (fabs.f64 b) #s(literal 2 binary64))
(pow.f64 (neg.f64 b) #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 b #s(literal 2 binary64))
(/.f64 #s(literal 1 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))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 (neg.f64 b) a))))
#s(approx r r)
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 (sin.f64 b) r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 (*.f64 (*.f64 b b) r) (+.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) b)))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (*.f64 (+.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) b))) r))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ r (* (cos a) b)) (/.f64 r (*.f64 (cos.f64 a) b)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (neg.f64 (*.f64 (*.f64 b r) (-.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 a) b) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (neg.f64 (*.f64 (*.f64 (*.f64 b b) r) (-.f64 (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) b))))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (*.f64 (neg.f64 r) (-.f64 (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) b)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (fma.f64 a (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #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)))) a)) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (fma.f64 a (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (fma.f64 a (fma.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a (neg.f64 (sin.f64 b))) (cos.f64 b)))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx a a)
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) 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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.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))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #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)))) a)) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (tan.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 a (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 r (tan.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (*.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)))))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))) (*.f64 (sin.f64 b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (cos.f64 b))))) 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)))))) a) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b)))) r) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) b))))))) a (*.f64 r (tan.f64 b))))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b)))
#s(approx (cos (+ a b)) (fma.f64 a (-.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)) (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b r))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b r) #s(literal 5/6 binary64)) b) a (*.f64 (*.f64 b r) #s(literal 1/2 binary64))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 b r))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (fma.f64 (fma.f64 (*.f64 (*.f64 b r) a) #s(literal 1/2 binary64) (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) b) r (*.f64 (*.f64 a (*.f64 b b)) (*.f64 r #s(literal 5/6 binary64)))) a (*.f64 (*.f64 b b) r)) a (*.f64 b r)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 r b))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 a r (/.f64 r b)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 (fma.f64 (*.f64 a (/.f64 r b)) #s(literal 1/2 binary64) r) a (/.f64 r b)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 (fma.f64 (fma.f64 (*.f64 r #s(literal 5/6 binary64)) a (*.f64 #s(literal 1/2 binary64) (/.f64 r b))) a r) a (/.f64 r b)))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) r)
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (fma.f64 (*.f64 a a) r r))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 r #s(literal -2/3 binary64))) (neg.f64 r)) (*.f64 a a) r))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (fma.f64 r #s(literal 28/45 binary64) (neg.f64 r))) (*.f64 r #s(literal -2/3 binary64))) (*.f64 a a)) (neg.f64 r)) (*.f64 a a) r))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(literal 1 binary64))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (+.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 a a) #s(literal 1/3 binary64)) (*.f64 a a)) #s(literal 1 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (+ a a)) #s(literal 1 binary64))
#s(approx (cos (+ a a)) (fma.f64 #s(literal -2 binary64) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (+ a a)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos (+ a a)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 a a) #s(literal 2/3 binary64)) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ a a) (+.f64 a a))
#s(approx (/ r (* (cos a) b)) (/.f64 r b))
#s(approx (/ r (* (cos a) b)) (fma.f64 (/.f64 (*.f64 (*.f64 a a) r) b) #s(literal 1/2 binary64) (/.f64 r b)))
#s(approx (/ r (* (cos a) b)) (fma.f64 (fma.f64 (neg.f64 (*.f64 a a)) (*.f64 (/.f64 r b) #s(literal -5/24 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 r b))) (*.f64 a a) (/.f64 r b)))
#s(approx (/ r (* (cos a) b)) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (fma.f64 (/.f64 r b) #s(literal -1/720 binary64) (fma.f64 #s(literal 1/48 binary64) (/.f64 r b) (*.f64 (*.f64 (/.f64 r b) #s(literal -5/24 binary64)) #s(literal 1/2 binary64))))) (*.f64 (/.f64 r b) #s(literal -5/24 binary64))) (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (/.f64 r b))) (*.f64 a a) (/.f64 r b)))
#s(approx (* (cos a) b) b)
#s(approx (* (cos a) b) (fma.f64 (*.f64 (*.f64 a a) b) #s(literal -1/2 binary64) b))
#s(approx (* (cos a) b) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) b) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) b)) (*.f64 a a) b))
#s(approx (* (cos a) b) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (*.f64 (*.f64 a a) b) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) b)) (*.f64 #s(literal -1/2 binary64) b)) (*.f64 a a) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 (neg.f64 b) a))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (cos.f64 (-.f64 (neg.f64 b) a)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 b) (cos.f64 a)))
#s(approx (cos a) (cos.f64 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 (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (cos (+ a a)) (cos.f64 (+.f64 a a)))
#s(approx (* (cos a) b) (*.f64 (cos.f64 a) b))
#s(approx (/ (* (sin b) r) (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 (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))))
#s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (cos (+ a a)) 1/2) 1/2) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (cos (+ a a)) (cos.f64 (+.f64 a a)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 b b) #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 (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (fma.f64 b (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (fma.f64 b (fma.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b (neg.f64 (sin.f64 a))) (cos.f64 a)))
#s(approx (neg (sin b)) (neg.f64 b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.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 (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 b b)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 #s(literal -1/2 binary64) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 b b) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/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) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 a) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))) (cos.f64 a))))) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 #s(literal 1 binary64) (cos.f64 a))) b))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 #s(literal 1 binary64) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 (-.f64 (fma.f64 (fma.f64 (neg.f64 b) #s(literal -1/3 binary64) #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 #s(literal 1 binary64) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (tan (+ (+ b (PI)) (PI))) (fma.f64 (-.f64 (fma.f64 (fma.f64 (neg.f64 b) #s(literal -1/3 binary64) #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (* (PI) 2) b) (+.f64 (PI.f64) (PI.f64)))
#s(approx (+ (* (PI) 2) b) (fma.f64 #s(literal 2 binary64) (PI.f64) b))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) b))) (fma.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64))) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 b b)) r r) b))
#s(approx (* (sin b) r) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) r (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* (sin b) r) (*.f64 (fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 b b)) r (*.f64 #s(literal 1/120 binary64) r)) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) 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 b (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 b (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) (cos.f64 a)))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 r (*.f64 (cos.f64 a) b)))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* b b) (*.f64 b b))
#s(approx (sin b) (sin.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (cos b) (cos.f64 b))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 b))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 b))
#s(approx (+ (* (PI) 2) b) b)
#s(approx (+ (* (PI) 2) b) (*.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal 2 binary64) #s(literal 1 binary64)) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b b) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (/.f64 r (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 a) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b)))
#s(approx (* (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (* b b)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 (*.f64 (sin.f64 a) r) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 (neg.f64 b) a))))
#s(approx (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 (neg.f64 b) a))))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 (-.f64 (+.f64 (PI.f64) (PI.f64)) (neg.f64 b))))
#s(approx (tan (+ (+ b (PI)) (PI))) (tan.f64 (-.f64 (+.f64 (PI.f64) (PI.f64)) (neg.f64 b))))
#s(approx (+ (* (PI) 2) b) (*.f64 (neg.f64 b) (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal -2 binary64)) #s(literal 1 binary64))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 (neg.f64 b) a))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 (neg.f64 b) a)))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval57.0ms (1.1%)

Memory
-9.7MiB live, 130.1MiB allocated; 8ms collecting garbage
Compiler

Compiled 16 806 to 2 337 computations (86.1% saved)

prune58.0ms (1.1%)

Memory
6.9MiB live, 106.4MiB allocated; 5ms collecting garbage
Pruning

60 alts after pruning (51 fresh and 9 done)

PrunedKeptTotal
New41115426
Fresh73643
Picked145
Done055
Total41960479
Accuracy
99.9%
Counts
479 → 60
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.5%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
✓79.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
61.7%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
56.7%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
54.3%
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
60.2%
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
53.1%
(/.f64 (*.f64 #s(approx (sin b) b) r) (cos.f64 (+.f64 a b)))
79.0%
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
61.8%
(*.f64 #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b)) r)
99.4%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))))
99.5%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (*.f64 (cos.f64 b) (cos.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))))
✓99.5%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))))
58.2%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 a)))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
66.2%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))))
✓99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
66.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a)))))
63.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
58.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
29.4%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (/.f64 (+.f64 (pow.f64 #s(approx (+ a b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(approx (+ a b) a) #s(approx (+ a b) a) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
34.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
33.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) b) #s(literal 1 binary64)) b)))))
7.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
16.4%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a))))
8.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
16.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
61.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
✓56.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
53.1%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
52.9%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
35.4%
(*.f64 r #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
36.0%
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))))
59.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
31.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
✓31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b))))
31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)))))
16.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (-.f64 b (PI.f64))) (PI.f64)))))
31.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 2 binary64) b) (PI.f64)) (PI.f64)))))
31.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 (PI.f64) b))))
6.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 #s(approx (+ b (PI)) (PI.f64)) (PI.f64)))))
✓17.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))
✓35.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
40.3%
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))))
40.1%
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
40.0%
#s(approx (* r (/ (sin b) (sin (+ (+ a b) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
52.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) #s(approx (+ 1/2 (* 1/2 (cos (* 2 a)))) #s(literal 1 binary64))) (/.f64 r (cos.f64 a))) b))
26.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r)) b))
53.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (/.f64 r (cos.f64 a))) b))
33.8%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
36.7%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (fma.f64 (sin.f64 a) #s(approx (/ r (+ (* (cos (+ a a)) 1/2) 1/2)) r) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
✓52.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
38.2%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) (fma.f64 (cos.f64 (+.f64 a a)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal -1 binary64)))))))
52.6%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) (fma.f64 b (/.f64 (sin.f64 a) #s(approx (+ (* (cos (+ a a)) 1/2) 1/2) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))))
28.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) a b) a #s(literal 1 binary64))))))
33.7%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 a b #s(literal 1 binary64))))))
25.3%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 #s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 a r (/.f64 r b))) (*.f64 b b))))
36.9%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 #s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 r (*.f64 (cos.f64 a) b))) (*.f64 b b))))
27.0%
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 #s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 r b)) (*.f64 b b))))
Compiler

Compiled 3 820 to 1 589 computations (58.4% saved)

regimes164.0ms (3.2%)

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

5 calls:

40.0ms
b
39.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
31.0ms
a
27.0ms
r
21.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
99.5%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
99.5%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
99.5%1r
99.5%1a
99.5%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes149.0ms (3%)

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

5 calls:

35.0ms
a
35.0ms
r
34.0ms
b
21.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
20.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
99.5%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
99.5%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
99.5%1b
99.5%1r
99.5%1a
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes103.0ms (2%)

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

20.0ms
b
20.0ms
a
20.0ms
r
19.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
19.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
99.4%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
99.4%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
99.4%1r
99.4%1a
99.4%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes110.0ms (2.2%)

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

5 calls:

23.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
22.0ms
r
21.0ms
a
21.0ms
b
19.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
79.1%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
79.1%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
79.1%1r
79.1%1a
79.1%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes58.0ms (1.2%)

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

5 calls:

12.0ms
a
12.0ms
r
11.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
10.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
10.0ms
b
Results
AccuracySegmentsBranch
79.0%1r
79.0%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
79.0%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
79.0%1a
79.0%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes54.0ms (1.1%)

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

5 calls:

11.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
11.0ms
a
10.0ms
b
10.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
10.0ms
r
Results
AccuracySegmentsBranch
61.8%1r
79.7%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
66.0%3(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
79.6%3a
79.5%3b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes13.0ms (0.2%)

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

1 calls:

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

Compiled 7 to 7 computations (0% saved)

regimes42.0ms (0.8%)

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

2 calls:

12.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
9.0ms
a
Results
AccuracySegmentsBranch
78.2%3a
79.5%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes28.0ms (0.6%)

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

2 calls:

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

Compiled 8 to 10 computations (-25% saved)

regimes12.0ms (0.2%)

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

2 calls:

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

Compiled 8 to 10 computations (-25% saved)

regimes17.0ms (0.3%)

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

2 calls:

11.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
5.0ms
b
Results
AccuracySegmentsBranch
79.5%3b
79.5%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes45.0ms (0.9%)

Memory
-18.6MiB live, 40.9MiB allocated; 32ms collecting garbage
Counts
11 → 1
Calls
Call 1
Inputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan (+ (+ b (PI)) (PI))) #s(literal 0 binary64))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 #s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (/.f64 r b)) (*.f64 b b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 a b #s(literal 1 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (*.f64 b r) a r)) b))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 #s(approx (+ (* (sin a) (/ r (+ (* (cos (+ a a)) 1/2) 1/2))) (/ r (* (cos a) b))) (fma.f64 a r (/.f64 r b))) (*.f64 b b))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(approx (* (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) b) (*.f64 (*.f64 b r) #s(approx (+ (* b (/ (sin a) (+ (* (cos (+ a a)) 1/2) 1/2))) (/ 1 (cos a))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) a b) a #s(literal 1 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 #s(approx (+ (* b (/ (* (sin a) r) (+ 1/2 (* 1/2 (cos (* 2 a)))))) (/ r (cos a))) (fma.f64 (fma.f64 (*.f64 a r) #s(literal 1/2 binary64) (*.f64 b r)) a r)) b))
(*.f64 #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b)) r)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Outputs
(*.f64 #s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (tan.f64 b)) r)
Calls

4 calls:

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

Compiled 18 to 21 computations (-16.7% saved)

regimes31.0ms (0.6%)

Memory
8.4MiB live, 47.8MiB allocated; 16ms collecting garbage
Accuracy

Total -17.7b remaining (-42.7%)

Threshold costs -17.7b (-42.7%)

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

5 calls:

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

Compiled 19 to 24 computations (-26.3% saved)

bsearch1.0ms (0%)

Memory
2.4MiB live, 2.4MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
5.0398986604244514e-26
1.413055318565401e-21
0.0ms
-0.06107652088702108
-0.057434640102374264
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
5.0398986604244514e-26
1.413055318565401e-21
0.0ms
-0.06107652088702108
-0.057434640102374264
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
5.0398986604244514e-26
1.413055318565401e-21
0.0ms
-0.01477170932341347
-1.0346490667207402e-8
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.8MiB live, 1.8MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
5.0398986604244514e-26
1.413055318565401e-21
0.0ms
-0.01477170932341347
-1.0346490667207402e-8
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
5.0398986604244514e-26
1.413055318565401e-21
0.0ms
-0.01477170932341347
-1.0346490667207402e-8
Compiler

Compiled 12 to 14 computations (-16.7% saved)

bsearch57.0ms (1.1%)

Memory
-20.9MiB live, 68.4MiB allocated; 18ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
16.0ms
5.0398986604236593e-26
1.413055318565401e-21
30.0ms
-95.06940158066779
-1.4800709175348092e-9
Samples
20.0ms162×1valid
7.0ms126×0valid
Compiler

Compiled 1 020 to 770 computations (24.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-cos: 8.0ms (41.9% of total)
adjust: 3.0ms (15.7% of total)
ival-sin: 3.0ms (15.7% of total)
ival-mult!: 2.0ms (10.5% of total)
ival-div!: 2.0ms (10.5% of total)
ival-add!: 1.0ms (5.2% of total)

derivations399.0ms (7.9%)

Memory
11.7MiB live, 218.3MiB allocated; 81ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 539 to 106 computations (80.3% saved)

preprocess133.0ms (2.6%)

Memory
4.8MiB live, 243.5MiB allocated; 15ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 2 174 to 856 computations (60.6% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...