rsin B (should all be same)

Time bar (total: 6.0s)

start0.0ms (0%)

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

analyze350.0ms (5.8%)

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

Compiled 11 to 10 computations (9.1% saved)

sample2.1s (35.2%)

Memory
21.7MiB live, 2 625.9MiB allocated; 446ms collecting garbage
Samples
1.5s5 996×1valid
194.0ms2 260×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-cos: 488.0ms (37.8% of total)
adjust: 274.0ms (21.2% of total)
ival-sin: 236.0ms (18.3% of total)
ival-mult: 116.0ms (9% of total)
ival-add: 91.0ms (7.1% of total)
ival-div: 82.0ms (6.4% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain197.0ms (3.3%)

Memory
6.7MiB live, 292.6MiB allocated; 88ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
72111(6.271651868023795e-299 -2.1359397152794609e-283 -4.8644160278402643e+70)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))sensitivity1830
Confusion
Predicted +Predicted -
+720
-11173
Precision
0.39344262295081966
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+7200
-111073
Precision?
0.39344262295081966
Recall?
1.0
Freqs
test
numberfreq
073
1183
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
121.0ms358×1valid
11.0ms154×0valid
Compiler

Compiled 69 to 28 computations (59.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 109.0ms
ival-add: 44.0ms (40.3% of total)
ival-sin: 29.0ms (26.6% of total)
ival-cos: 16.0ms (14.7% of total)
adjust: 10.0ms (9.2% of total)
ival-mult: 6.0ms (5.5% of total)
ival-div: 4.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess225.0ms (3.7%)

Memory
9.1MiB live, 200.0MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03897
110397
220697
342897
477097
5163097
6349197
7651797
089
0139
1249
2419
3659
4849
51089
62069
78019
852839
082689
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
Symmetry

(negabs r)

Compiler

Compiled 9 to 8 computations (11.1% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Compiler

Compiled 9 to 8 computations (11.1% saved)

series24.0ms (0.4%)

Memory
-12.8MiB live, 31.5MiB allocated; 8ms 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
7.0ms
b
@0
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
3.0ms
b
@inf
((* r (/ (sin b) (cos (+ a b)))) r (/ (sin b) (cos (+ a b))) (sin b) b (cos (+ a b)) (+ a b) a)
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
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)

rewrite211.0ms (3.5%)

Memory
11.9MiB live, 237.2MiB allocated; 45ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval11.0ms (0.2%)

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

Compiled 1 758 to 422 computations (76% saved)

prune22.0ms (0.4%)

Memory
-30.3MiB live, 28.7MiB allocated; 10ms collecting garbage
Pruning

22 alts after pruning (21 fresh and 1 done)

PrunedKeptTotal
New632184
Fresh000
Picked011
Done000
Total632285
Accuracy
99.7%
Counts
85 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.8%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
99.2%
(*.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.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
40.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
36.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a)))))))
75.7%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
64.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
61.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
53.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
51.7%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
58.6%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
37.5%
(*.f64 r (/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b))))
50.3%
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
50.6%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
54.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
58.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
50.3%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
49.9%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
61.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
58.8%
#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))))
50.4%
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 777 to 552 computations (29% saved)

series169.0ms (2.8%)

Memory
9.8MiB live, 210.4MiB allocated; 118ms collecting garbage
Counts
35 → 201
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)
(*.f64 r (/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b))))
(/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))
(log.f64 (sin.f64 b))
#s(literal 1 binary64)
(cos.f64 (+.f64 a b))
Outputs
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #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 (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (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 (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (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 (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 b))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (log b)))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (log b)))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#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 (exp (* (log (sin b)) 1)) #s(hole binary64 (sin b)))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (log (sin b))))
#s(approx (log (sin b)) #s(hole binary64 (log (sin 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)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
Calls

9 calls:

TimeVariablePointExpression
75.0ms
b
@-inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)))
49.0ms
b
@inf
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)))
12.0ms
a
@0
((* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (* r (/ (sin b) (cos (+ a b)))) (/ (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)))
5.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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)))
5.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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)))

rewrite196.0ms (3.3%)

Memory
11.8MiB live, 244.4MiB allocated; 27ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08346758
08825686
146955686
082635478
Stop Event
iter limit
node limit
iter limit
Counts
236 → 384
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)
(*.f64 r (/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b))))
(/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))
(log.f64 (sin.f64 b))
#s(literal 1 binary64)
(cos.f64 (+.f64 a b))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx r #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 (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (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 (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (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 (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- b (* -1 a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (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 (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 b))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (log b)))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (log b)))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#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 (exp (* (log (sin b)) 1)) #s(hole binary64 (sin b)))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (log (sin b))))
#s(approx (log (sin b)) #s(hole binary64 (log (sin 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)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (* r (/ (exp (* (log (sin b)) 1)) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (exp (* (log (sin b)) 1)) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
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)))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (log.f64 (sin.f64 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 (log.f64 (sin.f64 b)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(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)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a 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))))
(-.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) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (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 (fma.f64 #s(literal -1 binary64) 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 (fma.f64 #s(literal -1 binary64) b (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) 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))
(pow.f64 (cos.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64)))
(fma.f64 (sin.f64 b) #s(literal 0 binary64) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(exp.f64 (*.f64 (log.f64 (cos.f64 b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.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) #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))
(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)))
(*.f64 #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (tan.f64 b)) r)
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (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)))
(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)))
(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))))
(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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(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)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a 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))))
(-.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) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (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 (pow.f64 (neg.f64 (+.f64 a b)) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))) (+.f64 (pow.f64 (neg.f64 (+.f64 a b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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)
(*.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)))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (log.f64 (sin.f64 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 (log.f64 (sin.f64 b)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))
(*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (log.f64 (sin.f64 b)))
(log.f64 (sin.f64 b))
(*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (log.f64 (sin.f64 b)))
(log.f64 (sin.f64 b))
#s(literal 1 binary64)
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (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))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(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)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a 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))))
(-.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) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (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)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ 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 (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (tan.f64 b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 a (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (cos.f64 b))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (* (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 #s(literal 1/120 binary64) (*.f64 a a)) (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 a a)) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (sin.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.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) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (tan.f64 b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 a (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (cos.f64 b))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))))) a (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 a (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal -1/2 binary64))) a (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))
#s(approx (neg (+ a b)) (neg.f64 b))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 a) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (tan.f64 b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 a (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (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) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (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) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) 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 (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (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) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #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) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.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 (sin (+ (neg (+ a b)) (/ (PI) 2))) (cos.f64 a))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.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)) b (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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (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 (sin (+ (neg (+ a b)) (/ (PI) 2))) (cos.f64 a))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 b (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1/2 binary64))) b (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 b) a))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (neg.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.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 (* (log (sin b)) 1) (log.f64 b))
#s(approx (* (log (sin b)) 1) (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) (log.f64 b)))
#s(approx (* (log (sin b)) 1) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) (log.f64 b)))
#s(approx (* (log (sin b)) 1) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 b b)) #s(literal 1/180 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) (log.f64 b)))
#s(approx (* (log (sin b)) 1) (log.f64 b))
#s(approx (* (log (sin b)) 1) (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) (log.f64 b)))
#s(approx (* (log (sin b)) 1) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) (log.f64 b)))
#s(approx (* (log (sin b)) 1) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 b b)) #s(literal 1/180 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) (log.f64 b)))
#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 (sin b) (sin.f64 b))
#s(approx (* (log (sin b)) 1) (log.f64 (sin.f64 b)))
#s(approx (* (log (sin b)) 1) (log.f64 (sin.f64 b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (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) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (neg (+ a b)) (*.f64 (neg.f64 b) (+.f64 (/.f64 a b) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 a (neg.f64 b)))))

eval45.0ms (0.7%)

Memory
-16.4MiB live, 75.8MiB allocated; 7ms collecting garbage
Compiler

Compiled 8 377 to 1 584 computations (81.1% saved)

prune43.0ms (0.7%)

Memory
18.7MiB live, 72.7MiB allocated; 6ms collecting garbage
Pruning

45 alts after pruning (42 fresh and 3 done)

PrunedKeptTotal
New30733340
Fresh7916
Picked235
Done101
Total31745362
Accuracy
99.7%
Counts
362 → 45
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.8%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
53.9%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
40.5%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
53.9%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) a))))
34.0%
(*.f64 r (/.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.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)))))
99.2%
(*.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.2%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
99.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a)))))
51.8%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.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) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
52.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #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)) (sin.f64 a)))))
62.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
55.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.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
39.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
40.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))))
36.9%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
7.8%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
14.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
64.6%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
61.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
53.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
51.7%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
58.6%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
20.7%
(*.f64 r (/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
24.0%
(*.f64 r (/.f64 (exp.f64 #s(approx (* (log (sin b)) 1) (log.f64 b))) (cos.f64 (+.f64 a b))))
50.6%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
50.3%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
35.6%
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
49.9%
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
54.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
58.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
30.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
61.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
35.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
40.6%
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
40.4%
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
50.4%
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
58.8%
#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))))
Compiler

Compiled 1 833 to 1 365 computations (25.5% saved)

series67.0ms (1.1%)

Memory
-2.4MiB live, 88.2MiB allocated; 12ms collecting garbage
Counts
43 → 239
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 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 (sin.f64 b) r)
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))
(*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))
(neg.f64 b)
(fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
#s(literal -1 binary64)
#s(literal 1 binary64)
(*.f64 r (/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(exp.f64 (log.f64 (sin.f64 b)))
(log.f64 (sin.f64 b))
(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))
#s(literal 2 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 (/ (* (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 (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (+ (* (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 (/ (* (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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -1/2 (/ (PI) b)))))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (+ (* -1 a) (* -1 (* b (+ 1 (* -1/2 (/ (PI) b))))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (* -1/2 (/ (PI) b)))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (PI) b)) (/ a b)))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (+ (* -1 (/ a b)) (* 1/2 (/ (PI) b)))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (* r (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#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 (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* a (- (* -1 (/ (* b (+ 1 (* -1/2 (/ (PI) b)))) a)) 1))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* a (+ (* -1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* -1 (/ a b))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* a (- (* 1/2 (/ (PI) (* a b))) (/ 1 b)))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#s(approx (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (* 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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* a (+ 1 (/ (* b (+ 1 (* -1/2 (/ (PI) b)))) a))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* -1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (PI) (* a b))) (/ 1 b))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b 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 (/ (* (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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* -1 (/ (- (* 1/2 (PI)) a) b))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (/ (+ b (* -1 (- (* 1/2 (PI)) a))) b)))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (/ (- (* 1/2 (PI)) a) b)))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (* r (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (exp (log (sin b))) #s(hole binary64 b))
#s(approx (exp (log (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (exp (log (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (exp (log (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (log (sin b)) #s(hole binary64 (log b)))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) 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 (+ 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))
#s(approx (exp (log (sin b))) #s(hole binary64 (sin b)))
#s(approx (log (sin b)) #s(hole binary64 (log (sin b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
Calls

9 calls:

TimeVariablePointExpression
17.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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/ (- (* 1/2 (PI)) a) b) (- (* 1/2 (PI)) a) (* 1/2 (PI)) 1/2 (PI) -1 1 (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (exp (log (sin b))) (log (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) 2)
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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/ (- (* 1/2 (PI)) a) b) (- (* 1/2 (PI)) a) (* 1/2 (PI)) 1/2 (PI) -1 1 (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (exp (log (sin b))) (log (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) 2)
6.0ms
r
@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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/ (- (* 1/2 (PI)) a) b) (- (* 1/2 (PI)) a) (* 1/2 (PI)) 1/2 (PI) -1 1 (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (exp (log (sin b))) (log (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) 2)
5.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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/ (- (* 1/2 (PI)) a) b) (- (* 1/2 (PI)) a) (* 1/2 (PI)) 1/2 (PI) -1 1 (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (exp (log (sin b))) (log (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) 2)
5.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) (/ (* (sin b) r) (cos (+ a b))) (* (sin b) r) (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/ (- (* 1/2 (PI)) a) b) (- (* 1/2 (PI)) a) (* 1/2 (PI)) 1/2 (PI) -1 1 (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (exp (log (sin b))) (log (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) 2)

rewrite219.0ms (3.6%)

Memory
2.6MiB live, 189.3MiB allocated; 27ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09488470
010027305
152717305
081167065
Stop Event
iter limit
node limit
iter limit
Counts
282 → 450
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 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 (sin.f64 b) r)
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))
(*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))
(neg.f64 b)
(fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
#s(literal -1 binary64)
#s(literal 1 binary64)
(*.f64 r (/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(exp.f64 (log.f64 (sin.f64 b)))
(log.f64 (sin.f64 b))
(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))
#s(literal 2 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 (/ (* (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 (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (+ (* (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 (/ (* (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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -1/2 (/ (PI) b)))))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (+ (* -1 a) (* -1 (* b (+ 1 (* -1/2 (/ (PI) b))))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (* -1/2 (/ (PI) b)))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (PI) b)) (/ a b)))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (+ (* -1 (/ a b)) (* 1/2 (/ (PI) b)))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (* r (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#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 (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* a (- (* -1 (/ (* b (+ 1 (* -1/2 (/ (PI) b)))) a)) 1))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* a (+ (* -1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* -1 (/ a b))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* a (- (* 1/2 (/ (PI) (* a b))) (/ 1 b)))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#s(approx (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (* 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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* a (+ 1 (/ (* b (+ 1 (* -1/2 (/ (PI) b)))) a))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* -1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (PI) (* a b))) (/ 1 b))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b 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 (/ (* (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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* -1 (/ (- (* 1/2 (PI)) a) b))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (/ (+ b (* -1 (- (* 1/2 (PI)) a))) b)))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (/ (- (* 1/2 (PI)) a) b)))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (* r (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ b (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (exp (log (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 (/ (exp (log (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 (/ (exp (log (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 (exp (log (sin b))) #s(hole binary64 b))
#s(approx (exp (log (sin b))) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (exp (log (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (exp (log (sin b))) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (log (sin b)) #s(hole binary64 (log b)))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) 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 (+ 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))
#s(approx (exp (log (sin b))) #s(hole binary64 (sin b)))
#s(approx (log (sin b)) #s(hole binary64 (log (sin b))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (- a (* -1 b))))))
#s(approx (/ (* (sin b) r) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (* r (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (/ (exp (log (sin b))) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (sin b) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
Outputs
(*.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)))
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)
(exp.f64 (log.f64 (sin.f64 b)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (fma.f64 #s(literal -1 binary64) b a)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 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 (+.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 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(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 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 (+.f64 (neg.f64 (-.f64 a (neg.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 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b))))
(-.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 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.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 (neg.f64 b)))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a 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 (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) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (sin.f64 b) #s(literal 0 binary64) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(+.f64 (*.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 (sin.f64 a) (neg.f64 (sin.f64 b)))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (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 b (PI.f64)) a)) (cos.f64 (+.f64 (+.f64 b (PI.f64)) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (fma.f64 #s(literal -1 binary64) b a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a (+.f64 b (PI.f64)))) (cos.f64 (+.f64 a (+.f64 b (PI.f64))))) #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))
(fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (PI.f64)))
(sin.f64 (neg.f64 b))
(-.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 (sin.f64 b) (cos.f64 (PI.f64))) (*.f64 (cos.f64 b) (sin.f64 (PI.f64))))
(sin.f64 a)
(*.f64 #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(approx (tan b) b)) r)
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(approx (tan b) b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(approx (tan b) b))
#s(approx (tan b) b)
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(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)))
(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))))
(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) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))))) r)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))
(*.f64 (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) b) #s(literal -1 binary64))
(*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b))
(*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) b))
(neg.f64 (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) b))
(fma.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) (neg.f64 b) (*.f64 #s(literal 1 binary64) (neg.f64 b)))
(fma.f64 (neg.f64 b) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) (*.f64 (neg.f64 b) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) (neg.f64 b)) (*.f64 #s(literal 1 binary64) (neg.f64 b)))
(+.f64 (*.f64 (neg.f64 b) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))) (*.f64 (neg.f64 b) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal 3 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 1 binary64)))))
(fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))
(+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (neg.f64 b))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)
(-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)) (/.f64 a b))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (fma.f64 a a (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(PI.f64)
#s(literal -1 binary64)
#s(literal 1 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 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
(sin.f64 b)
(exp.f64 (log.f64 (sin.f64 b)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))
(log.f64 (sin.f64 b))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (fma.f64 #s(literal -1 binary64) b a)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 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 (+.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 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(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 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 (+.f64 (neg.f64 (-.f64 a (neg.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 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b))))
(-.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 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.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 (neg.f64 b)))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a 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 (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) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(/.f64 (-.f64 (pow.f64 (neg.f64 (+.f64 a b)) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))) (+.f64 (pow.f64 (neg.f64 (+.f64 a b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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)))
(+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(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))
#s(literal 2 binary64)
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* (sin b) r) (*.f64 (sin.f64 b) r))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (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))) 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 (* (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 #s(literal -1/120 binary64) (*.f64 a a)) (sin.f64 b) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))) (*.f64 a a) (neg.f64 (sin.f64 b))) a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 a a)) (sin.f64 b) (*.f64 #s(literal -1/120 binary64) (sin.f64 b))) (*.f64 a a) (*.f64 #s(literal 1/6 binary64) (sin.f64 b))) (*.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) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) 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 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (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 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))))) a (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 a (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal -1/2 binary64))) a (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 a)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (+.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (- (* 1/2 (PI)) a) b) (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)))
#s(approx (/ (- (* 1/2 (PI)) a) b) (fma.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64) (/.f64 (neg.f64 a) b)))
#s(approx (- (* 1/2 (PI)) a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (- (* 1/2 (PI)) a) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))))) a (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 a (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (neg (+ a b)) (neg.f64 b))
#s(approx (neg (+ a b)) (-.f64 (neg.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 (+ (* (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 (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg.f64 a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (-.f64 (/.f64 (*.f64 (neg.f64 b) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64))) a) #s(literal 1 binary64)) a))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 a b))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (fma.f64 (/.f64 (/.f64 (PI.f64) a) b) #s(literal -1/2 binary64) (+.f64 (pow.f64 b #s(literal -1 binary64)) (pow.f64 a #s(literal -1 binary64)))) a))
#s(approx (/ (- (* 1/2 (PI)) a) b) (/.f64 (neg.f64 a) b))
#s(approx (/ (- (* 1/2 (PI)) a) b) (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 (PI.f64) a) b) #s(literal 1/2 binary64)) (pow.f64 b #s(literal -1 binary64))) a))
#s(approx (- (* 1/2 (PI)) a) (neg.f64 a))
#s(approx (- (* 1/2 (PI)) a) (*.f64 (-.f64 (*.f64 (/.f64 (PI.f64) a) #s(literal 1/2 binary64)) #s(literal 1 binary64)) a))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#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 (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.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 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 a) (fma.f64 b (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a) #s(literal 1 binary64))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a)) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (- (* 1/2 (PI)) a) b) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (/.f64 (PI.f64) a) b) #s(literal -1/2 binary64) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (- (* 1/2 (PI)) a) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (PI.f64) a) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.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 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#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)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos 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) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (/.f64 (neg.f64 (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (exp (log (sin b))) b)
#s(approx (exp (log (sin b))) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (exp (log (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 (exp (log (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) b (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (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))) 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 (* (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) #s(literal -1/120 binary64)) (sin.f64 a) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) (sin.f64 a) (*.f64 #s(literal -1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))) (*.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) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (cos 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) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (/.f64 (neg.f64 (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (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 (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* (sin b) r) (*.f64 b r))
#s(approx (* (sin b) r) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* (sin b) r) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* (sin b) r) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) 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 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 b (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1/2 binary64))) b (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (neg b) (neg.f64 b))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) #s(literal -1 binary64) b) b))
#s(approx (/ (- (* 1/2 (PI)) a) b) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 b (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (exp (log (sin b))) b)
#s(approx (exp (log (sin b))) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (exp (log (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 (exp (log (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 (log (sin b)) (log.f64 b))
#s(approx (log (sin b)) (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) (log.f64 b)))
#s(approx (log (sin b)) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) (log.f64 b)))
#s(approx (log (sin b)) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 b b)) #s(literal 1/180 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) (log.f64 b)))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 b) a))
#s(approx (exp (log (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) (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg.f64 b))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 a b)) b))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(literal 1 binary64))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))
#s(approx (exp (log (sin b))) (sin.f64 b))
#s(approx (log (sin b)) (log.f64 (sin.f64 b)))
#s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.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 (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a 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)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (neg (+ a b)) (*.f64 (neg.f64 b) (+.f64 (/.f64 a b) #s(literal 1 binary64))))

eval52.0ms (0.9%)

Memory
22.3MiB live, 67.3MiB allocated; 7ms collecting garbage
Compiler

Compiled 11 177 to 1 923 computations (82.8% saved)

prune84.0ms (1.4%)

Memory
-47.0MiB live, 63.2MiB allocated; 19ms collecting garbage
Pruning

55 alts after pruning (50 fresh and 5 done)

PrunedKeptTotal
New37724401
Fresh112637
Picked325
Done033
Total39155446
Accuracy
99.8%
Counts
446 → 55
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.9%
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
39.2%
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
64.6%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
61.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
50.3%
(/.f64 (*.f64 #s(approx (exp (log (sin b))) b) r) (cos.f64 #s(approx (+ a b) a)))
75.8%
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
53.9%
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
40.5%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
53.9%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) a))))
34.0%
(*.f64 r (/.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))
99.1%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (sin.f64 a)))))
51.8%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))) (sin.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)))))
99.2%
(*.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.2%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
99.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
52.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #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)) (sin.f64 a)))))
62.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
55.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.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
39.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
40.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))))
12.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
22.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 1 binary64))))))))
17.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))))))))))
10.6%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 a b)))))))
25.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a)) (pow.f64 b #s(literal -1 binary64))))))))))
7.8%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
14.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
27.7%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 a) (fma.f64 b (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a) #s(literal 1 binary64))))))))
61.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
53.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
51.7%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
58.6%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
24.0%
(*.f64 r (/.f64 (exp.f64 #s(approx (* (log (sin b)) 1) (log.f64 b))) (cos.f64 (+.f64 a b))))
50.6%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
50.3%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
35.6%
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
49.9%
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
54.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
58.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
30.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
61.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
35.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
40.6%
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
40.4%
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
50.4%
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
58.8%
#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))))
Compiler

Compiled 2 447 to 1 784 computations (27.1% saved)

series51.0ms (0.8%)

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

9 calls:

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

rewrite310.0ms (5.2%)

Memory
-0.1MiB live, 227.8MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09237614
09696434
152996434
081866204
Stop Event
iter limit
node limit
iter limit
Counts
260 → 391
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))
r
(/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
(cos.f64 b)
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
#s(approx (/ (sin b) (cos (+ a 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 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b)
(fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64))
#s(literal 1/3 binary64)
(*.f64 b b)
#s(literal 1 binary64)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))
(neg.f64 a)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64))))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64))))
(*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))
(neg.f64 b)
(fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64))
(/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)
#s(approx (- (* 1/2 (PI)) a) (neg.f64 a))
#s(literal -1 binary64)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) #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 (+ (neg (+ a b)) (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) #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 a) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #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 a) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #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 a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (* 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 (+ (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) #s(hole binary64 (* -1 a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -1/2 (/ (PI) b)))))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (+ (* -1 a) (* -1 (* b (+ 1 (* -1/2 (/ (PI) b))))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (* -1/2 (/ (PI) b)))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (PI) b)) (/ a b)))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* 1/2 (/ (PI) b))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (+ (* -1 (/ a b)) (* 1/2 (/ (PI) b)))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* 1/2 (PI))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (+ (* -1 a) (* 1/2 (PI)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (pow (sin b) 2) (pow (cos b) 2))) (+ (* 1/6 (/ (pow (sin b) 2) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b))))) (cos b)))))) (+ (* -1 (/ (pow (sin b) 3) (pow (cos b) 3))) (* -1/2 (/ (sin b) (cos b)))))) (* -1 (/ (pow (sin b) 2) (pow (cos b) 2))))) (/ (sin b) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (sin b) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (/ (sin b) (cos (+ a b))) #s(hole binary64 (/ (sin b) (cos (+ a b)))))
#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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* a (- (* -1 (/ (* b (+ 1 (* -1/2 (/ (PI) b)))) a)) 1))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* a (+ (* -1/2 (/ (PI) (* a b))) (+ (/ 1 a) (/ 1 b))))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* -1 (/ a b))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* a (- (* 1/2 (/ (PI) (* a b))) (/ 1 b)))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 a)))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) 1))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (sin b) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (* 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 (+ (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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* a (+ 1 (/ (* b (+ 1 (* -1/2 (/ (PI) b)))) a))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ 1 (* -1/2 (/ (PI) b))) a)) (/ 1 b))))))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (PI) (* a b))) (/ 1 b))))))
#s(approx (- (* 1/2 (PI)) a) #s(hole binary64 (* -1 (* a (+ 1 (* -1/2 (/ (PI) a)))))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) #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 a) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #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 a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* 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 (* (+ (* 1/3 (* b b)) 1) b) #s(hole binary64 b))
#s(approx (* (+ (* 1/3 (* b b)) 1) b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (+ (* 1/3 (* b b)) 1) #s(hole binary64 1))
#s(approx (+ (* 1/3 (* b b)) 1) #s(hole binary64 (+ 1 (* 1/3 (pow b 2)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (* -1 (/ (- (* 1/2 (PI)) a) b))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (/ (+ b (* -1 (- (* 1/2 (PI)) a))) b)))
#s(approx (/ (- (* 1/2 (PI)) a) b) #s(hole binary64 (/ (- (* 1/2 (PI)) a) b)))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ b (cos a))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ 1 (cos a)) (/ (* b (sin a)) (pow (cos a) 2))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (/ (sin b) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* 1/2 (/ 1 (cos a))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (cos a))) (+ (* -1/2 (/ (sin a) (pow (cos a) 2))) (* 1/6 (/ (sin a) (pow (cos a) 2))))))) (* 1/2 (/ 1 (cos a)))) (+ (* -1 (/ (pow (sin a) 2) (pow (cos a) 3))) (* 1/6 (/ 1 (cos a)))))) (* -1 (/ (sin a) (pow (cos a) 2))))) (/ 1 (cos a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (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) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (* (+ (* 1/3 (* b b)) 1) b) #s(hole binary64 (* 1/3 (pow b 3))))
#s(approx (* (+ (* 1/3 (* b b)) 1) b) #s(hole binary64 (* (pow b 3) (+ 1/3 (/ 1 (pow b 2))))))
#s(approx (+ (* 1/3 (* b b)) 1) #s(hole binary64 (* 1/3 (pow b 2))))
#s(approx (+ (* 1/3 (* b b)) 1) #s(hole binary64 (* (pow b 2) (+ 1/3 (/ 1 (pow b 2))))))
#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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 1))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(hole binary64 (+ 1 (* -1 (/ (- (* 1/2 (PI)) 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 (* 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (cos.f64 a) (cos.f64 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 (+.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 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(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))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (+.f64 a b))))
(-.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 (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)))
(-.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (neg.f64 (cos.f64 a)) (cos.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 (-.f64 a (neg.f64 b)))
(cos.f64 (neg.f64 (+.f64 a 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 (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) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(neg.f64 (sin.f64 b))
(fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (PI.f64)))
(sin.f64 (neg.f64 b))
(-.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 (sin.f64 b) (cos.f64 (PI.f64))) (*.f64 (cos.f64 b) (sin.f64 (PI.f64))))
(*.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)) (cos.f64 (+.f64 a b))) #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 (fma.f64 #s(literal -1 binary64) 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 b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b a)) (cos.f64 (+.f64 a b))) #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 b a))) #s(literal 2 binary64))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) #s(literal 0 binary64)) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(fma.f64 (sin.f64 b) #s(literal 0 binary64) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 b)
(+.f64 (*.f64 (sin.f64 b) #s(literal 0 binary64)) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(*.f64 #s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(approx (tan b) (*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) b))) r)
(*.f64 r #s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(approx (tan b) (*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(approx (tan b) (*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) b)))
#s(approx (tan b) (*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) b))
(*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) b)
(*.f64 b (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) b (*.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) b))
(fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64))))
(+.f64 (*.f64 b #s(literal 1 binary64)) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) b) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) b))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) b) b #s(literal 1 binary64))
(fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 b b)))
(+.f64 (*.f64 (*.f64 b b) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))
#s(literal 1/3 binary64)
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 b) #s(literal 2 binary64))
(pow.f64 (neg.f64 b) #s(literal 2 binary64))
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))) r)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))
(*.f64 #s(literal -1 binary64) a)
(*.f64 a #s(literal -1 binary64))
(neg.f64 a)
(*.f64 (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64)))))) r)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64)))))))
(/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64))))))
(sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64))))
(*.f64 (neg.f64 b) (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64)))
(*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64)) (neg.f64 b))
(neg.f64 (*.f64 b (fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) (neg.f64 b) (*.f64 #s(literal 1 binary64) (neg.f64 b)))
(fma.f64 (neg.f64 b) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) (*.f64 (neg.f64 b) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) (neg.f64 b)) (*.f64 #s(literal 1 binary64) (neg.f64 b)))
(+.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b))) (*.f64 (neg.f64 b) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (pow.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 3 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)))
(/.f64 (neg.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a))) (neg.f64 b))
(/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)
#s(approx (- (* 1/2 (PI)) a) (neg.f64 a))
#s(literal -1 binary64)
(*.f64 (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) r)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (+.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 b)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx r r)
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 a (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (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))) a (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 a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (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 a) (cos b)) (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 (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 a (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))))) a (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 a (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))) a (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal -1/2 binary64))) a (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))
#s(approx (neg a) (neg.f64 a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 a)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (+.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (- (* 1/2 (PI)) a) b) (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)))
#s(approx (/ (- (* 1/2 (PI)) a) b) (fma.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64) (/.f64 (neg.f64 a) b)))
#s(approx (- (* 1/2 (PI)) a) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (- (* 1/2 (PI)) a) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 r (tan.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 r (tan.f64 b) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 r (tan.f64 b)) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 r (tan.f64 b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (tan.f64 b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 a (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) a) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) a (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (tan.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (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 a) (cos b)) (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 (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/6 binary64) (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 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 (+.f64 a b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg.f64 a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (-.f64 (/.f64 (*.f64 (neg.f64 b) (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64))) a) #s(literal 1 binary64)) a))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 a b))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (fma.f64 (/.f64 (/.f64 (PI.f64) a) b) #s(literal -1/2 binary64) (+.f64 (pow.f64 b #s(literal -1 binary64)) (pow.f64 a #s(literal -1 binary64)))) a))
#s(approx (/ (- (* 1/2 (PI)) a) b) (/.f64 (neg.f64 a) b))
#s(approx (/ (- (* 1/2 (PI)) a) b) (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 (PI.f64) a) b) #s(literal 1/2 binary64)) (pow.f64 b #s(literal -1 binary64))) a))
#s(approx (- (* 1/2 (PI)) a) (neg.f64 a))
#s(approx (- (* 1/2 (PI)) a) (*.f64 (-.f64 (*.f64 (/.f64 (PI.f64) a) #s(literal 1/2 binary64)) #s(literal 1 binary64)) a))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 a) (fma.f64 b (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a) #s(literal 1 binary64))))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a)) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (- (* 1/2 (PI)) a) b) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (/.f64 (PI.f64) a) b) #s(literal -1/2 binary64) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (- (* 1/2 (PI)) a) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (PI.f64) a) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (/.f64 (neg.f64 (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) b (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (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))) b (cos.f64 a)))
#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 #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 a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (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 a) (cos b)) (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 (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (/.f64 (neg.f64 (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #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 (* (+ (* 1/3 (* b b)) 1) b) b)
#s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)) b))
#s(approx (+ (* 1/3 (* b b)) 1) #s(literal 1 binary64))
#s(approx (+ (* 1/3 (* b b)) 1) (fma.f64 (*.f64 b b) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (* b b) (*.f64 b b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 b (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) b (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) b (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1 binary64))) b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1/2 binary64))) b (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (neg b) (neg.f64 b))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) b))
#s(approx (/ (- (* 1/2 (PI)) a) b) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 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 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) b) (/.f64 (neg.f64 (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a)))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1/6 binary64) (cos.f64 a))))) b (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.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)) b (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (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 a) (cos b)) (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 (* (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 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) 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) (tan.f64 b))
#s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64)))
#s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 b #s(literal 3 binary64))))
#s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))
#s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 b 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 b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (neg.f64 b))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 a b)) b))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) #s(literal 1 binary64))
#s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (sin.f64 b) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))
#s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)) (neg.f64 b)))

eval84.0ms (1.4%)

Memory
-16.3MiB live, 89.5MiB allocated; 13ms collecting garbage
Compiler

Compiled 12 472 to 2 048 computations (83.6% saved)

prune89.0ms (1.5%)

Memory
-6.9MiB live, 87.3MiB allocated; 4ms collecting garbage
Pruning

67 alts after pruning (57 fresh and 10 done)

PrunedKeptTotal
New40523428
Fresh113445
Picked055
Done055
Total41667483
Accuracy
99.8%
Counts
483 → 67
Alt Table
Click to see full alt table
StatusAccuracyProgram
62.7%
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
39.2%
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
18.0%
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
64.6%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
61.1%
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
50.3%
(/.f64 (*.f64 #s(approx (exp (log (sin b))) b) r) (cos.f64 #s(approx (+ a b) a)))
75.8%
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
53.9%
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
40.5%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
53.9%
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) a))))
34.0%
(*.f64 r (/.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
99.1%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (*.f64 (cos.f64 a) (cos.f64 b)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))
62.7%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) #s(literal 1 binary64)) (cos.f64 b)))))
55.2%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 a)))))
52.3%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 #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))) (*.f64 (cos.f64 a) (cos.f64 b)))))
99.1%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (sin.f64 a)))))
51.8%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))) (sin.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)))))
99.2%
(*.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.2%
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
99.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a)))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
40.4%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
40.0%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
62.7%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a)))))
58.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) #s(approx (sin a) a)))))
37.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 #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)) (sin.f64 a)))))
40.0%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a)))))
55.2%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
39.6%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
40.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
39.2%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
40.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))))
12.5%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
6.7%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (fma.f64 (pow.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 3 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))))))))))
8.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))))))))
10.6%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 a b)))))))
25.0%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a)) (pow.f64 b #s(literal -1 binary64))))))))))
7.8%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b)))))
14.3%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
27.7%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 a) (fma.f64 b (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a) #s(literal 1 binary64))))))))
61.0%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
53.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
51.7%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
24.0%
(*.f64 r (/.f64 (exp.f64 #s(approx (* (log (sin b)) 1) (log.f64 b))) (cos.f64 (+.f64 a b))))
11.7%
(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
50.6%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
50.3%
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 #s(approx (+ a b) a))))
49.9%
(*.f64 r #s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
54.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
58.4%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
30.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
61.1%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
35.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
35.6%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
15.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 #s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))) b))))
15.0%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64))))))
16.8%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 b #s(literal 3 binary64)))))))
35.7%
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
40.4%
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
50.4%
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (*.f64 b (/.f64 r (cos.f64 a))))
58.8%
#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))))
Compiler

Compiled 3 908 to 1 671 computations (57.2% saved)

regimes176.0ms (2.9%)

Memory
26.4MiB live, 118.7MiB allocated; 11ms collecting garbage
Counts
102 → 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) (*.f64 #s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (*.f64 #s(approx (exp (log (sin b))) b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 b #s(literal 3 binary64)))))))
(*.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 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
(/.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) (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 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.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) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 a b)))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 a) (fma.f64 b (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a) #s(literal 1 binary64))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
#s(approx (* 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))))
(*.f64 r (/.f64 (exp.f64 #s(approx (* (log (sin b)) 1) (log.f64 b))) (cos.f64 (+.f64 a b))))
(*.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 (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) #s(approx (sin a) a)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 #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)) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a)) (pow.f64 b #s(literal -1 binary64))))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 1 binary64))))))))
(*.f64 r (/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 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 a) (cos b)) (cos.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) #s(literal 1 binary64)) (cos.f64 b)))))
(*.f64 r (/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a)))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #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)) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 #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))) (*.f64 (cos.f64 a) (cos.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (fma.f64 (pow.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 3 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r #s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (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 a) (cos.f64 b)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (tan.f64 b) #s(literal -1/2 binary64) (neg.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))) a (tan.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (fma.f64 (sin.f64 b) (cos.f64 (PI.f64)) (*.f64 (cos.f64 b) (sin.f64 (PI.f64)))) (*.f64 (cos.f64 a) (cos.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b)))) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b))))) (sin.f64 a)))))
(*.f64 r (/.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 b))) (sinh.f64 (log.f64 (sin.f64 b)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))))
(*.f64 r (/.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 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))
Calls

5 calls:

47.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
47.0ms
r
26.0ms
b
25.0ms
a
25.0ms
(*.f64 r (/.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)

regimes168.0ms (2.8%)

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

5 calls:

43.0ms
r
39.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
33.0ms
b
25.0ms
a
22.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
99.4%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
99.4%1(/.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)

regimes127.0ms (2.1%)

Memory
-10.9MiB live, 225.5MiB allocated; 19ms collecting garbage
Counts
89 → 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) (*.f64 #s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (*.f64 #s(approx (exp (log (sin b))) b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 b #s(literal 3 binary64)))))))
(*.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 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
(/.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) (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 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.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) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (/.f64 a b)))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64)))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(approx (* (neg b) (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1)) (*.f64 (neg.f64 a) (fma.f64 b (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a) #s(literal 1 binary64))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))))
#s(approx (* 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))))
(*.f64 r (/.f64 (exp.f64 #s(approx (* (log (sin b)) 1) (log.f64 b))) (cos.f64 (+.f64 a b))))
(*.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 (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (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)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos b) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) #s(approx (sin a) a)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a)))))
(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 #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)) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) #s(approx (+ (* (/ (- (* 1/2 (PI)) a) b) -1) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64) #s(literal 1 binary64)) a)) (pow.f64 b #s(literal -1 binary64))))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 1 binary64))))))))
(*.f64 r (/.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 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 a) (cos b)) (cos.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) #s(literal 1 binary64)) (cos.f64 b)))))
(*.f64 r (/.f64 (exp.f64 (log.f64 (sin.f64 b))) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a)))))))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #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)) (sin.f64 a)))))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 #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))) (*.f64 (cos.f64 a) (cos.f64 b)))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (fma.f64 (pow.f64 (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b) #s(literal 3 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (* 1/2 (PI)) a) (neg.f64 a)) b)) #s(literal 1 binary64))))))))))
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))))))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r #s(approx (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) b)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
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:

26.0ms
r
26.0ms
b
25.0ms
a
23.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
23.0ms
(*.f64 r (/.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)

regimes144.0ms (2.4%)

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

5 calls:

40.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
33.0ms
r
23.0ms
b
22.0ms
a
22.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
75.8%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
75.8%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
75.8%1r
75.8%1a
75.8%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes49.0ms (0.8%)

Memory
1.9MiB live, 95.1MiB allocated; 5ms collecting garbage
Counts
32 → 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) (*.f64 #s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (*.f64 #s(approx (exp (log (sin b))) b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 b #s(literal 3 binary64)))))))
(*.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 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
(/.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) (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 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a 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:

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

Compiled 19 to 24 computations (-26.3% saved)

regimes48.0ms (0.8%)

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

5 calls:

12.0ms
b
9.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
9.0ms
a
8.0ms
r
8.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
75.7%1a
75.7%1(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
75.7%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
75.7%1r
75.7%1b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes54.0ms (0.9%)

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

5 calls:

18.0ms
r
10.0ms
b
8.0ms
a
8.0ms
(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
8.0ms
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
Results
AccuracySegmentsBranch
75.8%3(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))
61.1%1(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
64.2%2r
75.2%3a
75.8%3b
Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes26.0ms (0.4%)

Memory
-36.8MiB live, 15.7MiB allocated; 29ms collecting garbage
Counts
26 → 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) (*.f64 #s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64))))))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (* r (/ (sin b) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos 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 (*.f64 #s(approx (exp (log (sin b))) b) r) (cos.f64 #s(approx (+ a b) a)))
(*.f64 r (/.f64 #s(approx (sin b) b) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a)))))
(*.f64 r (/.f64 #s(approx (sin b) b) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r #s(approx (/ (sin b) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (+.f64 (pow.f64 b #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 b #s(literal 3 binary64)))))))
(*.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 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) a))))
(/.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 b)))
(*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Calls

1 calls:

7.0ms
b
Results
AccuracySegmentsBranch
75.8%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.2%)

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

2 calls:

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

Compiled 8 to 10 computations (-25% saved)

regimes15.0ms (0.3%)

Memory
-22.6MiB live, 25.6MiB allocated; 5ms collecting garbage
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) (*.f64 #s(approx (+ (* 1/3 (* b b)) 1) (*.f64 (*.f64 b b) #s(literal 1/3 binary64))) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) (fma.f64 b #s(literal 1 binary64) (*.f64 b (*.f64 (*.f64 b b) #s(literal 1/3 binary64)))))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) #s(approx (* (+ (* 1/3 (* b b)) 1) b) (*.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 1/3 binary64))))))
Outputs
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
Calls

4 calls:

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

Compiled 10 to 16 computations (-60% saved)

regimes12.0ms (0.2%)

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

5 calls:

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

Compiled 19 to 24 computations (-26.3% saved)

regimes12.0ms (0.2%)

Memory
-23.9MiB live, 23.2MiB allocated; 2ms collecting garbage
Accuracy

Total -13.4b remaining (-32.5%)

Threshold costs -13.4b (-32.5%)

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

5 calls:

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

Compiled 19 to 24 computations (-26.3% saved)

bsearch47.0ms (0.8%)

Memory
19.3MiB live, 66.1MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
24.0ms
66224232672765.87
402452106354867.3
20.0ms
-0.0008354117017210291
-8.239043285320349e-7
Samples
30.0ms158×1valid
4.0ms66×0valid
Compiler

Compiled 424 to 370 computations (12.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-cos: 10.0ms (37.8% of total)
ival-sin: 5.0ms (18.9% of total)
adjust: 4.0ms (15.1% of total)
ival-mult: 3.0ms (11.3% of total)
ival-add: 2.0ms (7.6% of total)
ival-div: 2.0ms (7.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
3.2MiB live, 3.2MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
66224232672765.87
402452106354867.3
1.0ms
-0.0008354117017210291
-8.239043285320349e-7
Compiler

Compiled 432 to 378 computations (12.5% saved)

bsearch50.0ms (0.8%)

Memory
-31.5MiB live, 63.0MiB allocated; 13ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
16.0ms
2.422819548938481e-9
1.6088119318411194e-7
29.0ms
-8.239043285320349e-7
-1.536315260350085e-16
Samples
18.0ms113×1valid
11.0ms159×0valid
Compiler

Compiled 488 to 422 computations (13.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 20.0ms
ival-cos: 6.0ms (30.1% of total)
adjust: 3.0ms (15.1% of total)
ival-mult: 3.0ms (15.1% of total)
ival-sin: 3.0ms (15.1% of total)
ival-add: 2.0ms (10% of total)
ival-div: 2.0ms (10% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify34.0ms (0.6%)

Memory
-0.6MiB live, 45.8MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078257
1106257
2134257
3176257
4244257
5699257
67881257
Stop Event
node limit
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.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) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -1890791267555229/2305843009213693952 binary64)) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b))) (if (<=.f64 b #s(literal 67000000000000 binary64)) (*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))))
(if (<=.f64 b #s(literal -1890791267555229/2305843009213693952 binary64)) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))) (if (<=.f64 b #s(literal 67000000000000 binary64)) (*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))))
(if (<=.f64 b #s(literal -1558380939346983/2361183241434822606848 binary64)) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))) (if (<=.f64 b #s(literal 3022314549036573/18889465931478580854784 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.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) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -1890791267555229/2305843009213693952 binary64)) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b))) (if (<=.f64 b #s(literal 67000000000000 binary64)) (*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))))
(if (<=.f64 b #s(literal -1890791267555229/2305843009213693952 binary64)) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))) (if (<=.f64 b #s(literal 67000000000000 binary64)) (*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -1890791267555229/2305843009213693952 binary64)) (not (<=.f64 b #s(literal 67000000000000 binary64)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))) (*.f64 r (/.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (cos.f64 (+.f64 a b)))))
(if (<=.f64 b #s(literal -1558380939346983/2361183241434822606848 binary64)) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))) (if (<=.f64 b #s(literal 3022314549036573/18889465931478580854784 binary64)) #s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -1558380939346983/2361183241434822606848 binary64)) (not (<=.f64 b #s(literal 3022314549036573/18889465931478580854784 binary64)))) (*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b))) #s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 b (/.f64 r (cos.f64 a)))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (tan.f64 b)))
(*.f64 r #s(approx (/ (sin b) (cos (+ a 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))))
(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) #s(approx (tan b) b)))

derivations327.0ms (5.4%)

Memory
20.9MiB live, 388.4MiB allocated; 50ms collecting garbage
Stop Event
fuel
Compiler

Compiled 257 to 81 computations (68.5% saved)

preprocess139.0ms (2.3%)

Memory
21.6MiB live, 125.0MiB allocated; 121ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 596 to 226 computations (62.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...