rsin A (should all be same)

Time bar (total: 5.9s)

start0.0ms (0%)

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

analyze311.0ms (5.2%)

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

Compiled 11 to 10 computations (9.1% saved)

sample2.2s (36.9%)

Memory
22.5MiB live, 1 753.3MiB allocated; 1.2s collecting garbage
Samples
1.7s6 029×1valid
157.0ms2 227×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-cos: 394.0ms (35% of total)
ival-sin: 276.0ms (24.5% of total)
adjust: 173.0ms (15.4% of total)
ival-add: 141.0ms (12.5% of total)
ival-div: 72.0ms (6.4% of total)
ival-mult: 65.0ms (5.8% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

explain170.0ms (2.9%)

Memory
-6.5MiB live, 281.7MiB allocated; 66ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
65122(2.516951404136629e+116 -7.731382904917282e+300 -1.2363375580869533e-239)0-(cos.f64 (+.f64 a b))
00-0-(+.f64 a b)
00-0-(sin.f64 b)
00-0-a
00-0-(*.f64 r (sin.f64 b))
00-0-r
00-0-b
00-0-(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (+.f64 a b))sensitivity1870
Confusion
Predicted +Predicted -
+650
-12269
Precision
0.34759358288770054
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6500
-122069
Precision?
0.34759358288770054
Recall?
1.0
Freqs
test
numberfreq
069
1187
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
77.0ms358×1valid
21.0ms154×0valid
Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 58.0ms
ival-cos: 17.0ms (29.2% of total)
ival-sin: 14.0ms (24.1% of total)
adjust: 9.0ms (15.5% of total)
ival-mult: 7.0ms (12% of total)
ival-add: 6.0ms (10.3% of total)
ival-div: 4.0ms (6.9% of total)
ival-true: 1.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)

preprocess191.0ms (3.2%)

Memory
15.9MiB live, 153.0MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03897
110397
225197
357397
4101397
5204597
6433797
089
0139
1249
2429
3659
4839
51079
62059
77999
852909
082779
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (sin.f64 b) r) (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
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶79.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Compiler

Compiled 9 to 8 computations (11.1% saved)

series43.0ms (0.7%)

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

9 calls:

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

rewrite183.0ms (3.1%)

Memory
35.9MiB live, 162.9MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval17.0ms (0.3%)

Memory
-40.3MiB live, 19.6MiB allocated; 9ms collecting garbage
Compiler

Compiled 1 566 to 357 computations (77.2% saved)

prune15.0ms (0.2%)

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

22 alts after pruning (21 fresh and 1 done)

PrunedKeptTotal
New582179
Fresh000
Picked011
Done000
Total582280
Accuracy
99.8%
Counts
80 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
79.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
▶99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
41.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
43.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓79.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
64.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
▶62.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
▶60.8%
(/.f64 (*.f64 r (sin.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))))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
61.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
40.3%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 (+.f64 a b)))
52.8%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
53.0%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
79.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
▶61.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
52.9%
#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))
▶62.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
53.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 827 to 554 computations (33% saved)

series55.0ms (0.9%)

Memory
-8.0MiB live, 82.6MiB allocated; 10ms collecting garbage
Counts
29 → 155
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b)))
(*.f64 r (*.f64 (tan.f64 b) (tan.f64 b)))
(*.f64 (tan.f64 b) (tan.f64 b))
(/.f64 (*.f64 r (sin.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 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))
(-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))
(*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64))
(*.f64 (cos.f64 b) a)
#s(literal -1/2 binary64)
Outputs
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* r (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* -1 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (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 (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 (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (- (* -1/2 (* a (cos b))) (sin b))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (* (cos b) a) #s(hole binary64 (* a (cos 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 (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* a (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* a (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (* a (+ (* 1/2 (cos b)) (/ (sin b) a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* 1/3 (* b r)) (* a r)))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* a r) (* b (+ (* 1/3 r) (* 2/3 (* a (* b r)))))))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (pow b 2)))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* b (+ (* 1/6 b) (* 1/4 a))) 1)))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 a)))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* 1/4 (* a (pow b 2))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* -1/48 (* a (pow b 2))) (* 1/4 a))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* 1/4 a) (* (pow b 2) (+ (* -1/48 a) (* 1/1440 (* a (pow b 2))))))))))
#s(approx (* (cos b) a) #s(hole binary64 a))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Calls

9 calls:

TimeVariablePointExpression
9.0ms
b
@inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
8.0ms
r
@inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
6.0ms
a
@0
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
6.0ms
r
@-inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)
5.0ms
b
@-inf
((/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (sin b)) r (sin b) b (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos b) (cos a) a (* (sin b) (sin a)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ a b) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* r (* (tan b) (tan b))) (* (tan b) (tan b)) (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (- (* (* (cos b) a) -1/2) (sin b)) (* (* (cos b) a) -1/2) (* (cos b) a) -1/2)

rewrite184.0ms (3.1%)

Memory
19.8MiB live, 204.1MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06763859
07233529
141113499
081173341
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
184 → 299
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b)))
(*.f64 r (*.f64 (tan.f64 b) (tan.f64 b)))
(*.f64 (tan.f64 b) (tan.f64 b))
(/.f64 (*.f64 r (sin.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 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))
(-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))
(*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64))
(*.f64 (cos.f64 b) a)
#s(literal -1/2 binary64)
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* r (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* -1 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (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 (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 (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (- (* -1/2 (* a (cos b))) (sin b))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (* (cos b) a) #s(hole binary64 (* a (cos 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 (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* a (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 (* a (cos b)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* a (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1 (* a (+ (* 1/2 (cos b)) (/ (sin b) a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* 1/3 (* b r)) (* a r)))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* a r) (* b (+ (* 1/3 r) (* 2/3 (* a (* b r)))))))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (pow b 2)))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (* -1/2 a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1 b) (* -1/2 a))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* 1/4 (* a b)) 1)))))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) #s(hole binary64 (+ (* -1/2 a) (* b (- (* b (+ (* 1/6 b) (* 1/4 a))) 1)))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (* -1/2 a)))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* 1/4 (* a (pow b 2))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* -1/48 (* a (pow b 2))) (* 1/4 a))))))
#s(approx (* (* (cos b) a) -1/2) #s(hole binary64 (+ (* -1/2 a) (* (pow b 2) (+ (* 1/4 a) (* (pow b 2) (+ (* -1/48 a) (* 1/1440 (* a (pow b 2))))))))))
#s(approx (* (cos b) a) #s(hole binary64 a))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* -1/2 (* a (pow b 2))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* 1/24 (* a (pow b 2))))))))
#s(approx (* (cos b) a) #s(hole binary64 (+ a (* (pow b 2) (+ (* -1/2 a) (* (pow b 2) (+ (* -1/720 (* a (pow b 2))) (* 1/24 a))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 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)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (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)))
(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 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 (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 (fma.f64 #s(literal -1 binary64) a (neg.f64 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) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 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) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))
(fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 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)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.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 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(fma.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a (*.f64 (tan.f64 b) r)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) (*.f64 (tan.f64 b) r)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) (*.f64 (tan.f64 b) r)))))
(fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r))
(fma.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a (*.f64 (tan.f64 b) r))
(fma.f64 (tan.f64 b) r (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a))
(fma.f64 a (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (*.f64 (tan.f64 b) r))
(fma.f64 r (tan.f64 b) (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a))
(-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) (*.f64 (neg.f64 r) (tan.f64 b)))
(+.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a) (*.f64 (tan.f64 b) r))
(+.f64 (*.f64 (tan.f64 b) r) (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)
(*.f64 (*.f64 (tan.f64 b) r) (tan.f64 b))
(*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (tan.f64 b))) (neg.f64 (fabs.f64 (tan.f64 b))))
(*.f64 (neg.f64 (neg.f64 (tan.f64 b))) (neg.f64 (neg.f64 (tan.f64 b))))
(*.f64 (fabs.f64 (fabs.f64 (tan.f64 b))) (fabs.f64 (fabs.f64 (tan.f64 b))))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 1 binary64)) (pow.f64 (tan.f64 b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 1 binary64)) (tan.f64 b))
(*.f64 (fabs.f64 (tan.f64 b)) (fabs.f64 (tan.f64 b)))
(*.f64 (neg.f64 (tan.f64 b)) (neg.f64 (tan.f64 b)))
(*.f64 (tan.f64 b) (tan.f64 b))
(pow.f64 (fabs.f64 (tan.f64 b)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (tan.f64 b)) #s(literal 2 binary64))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(fabs.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (tan.f64 b)) #s(literal 2 binary64)))
(*.f64 r (/.f64 (sin.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)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #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)))))
(/.f64 (*.f64 (sin.f64 b) r) #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 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
(/.f64 (-.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64))) (-.f64 (cos.f64 b) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))
(/.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 3 binary64))) (fma.f64 (cos.f64 b) (cos.f64 b) (-.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))))
(fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))
(fma.f64 a (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) (cos.f64 b))
(-.f64 (cos.f64 b) (*.f64 (neg.f64 a) (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b))
(+.f64 (cos.f64 b) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64) (sin.f64 b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (sin.f64 b) (sin.f64 b) (*.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)))))
(-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b))
(*.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b))
(*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64))
(*.f64 (cos.f64 b) (*.f64 #s(literal -1/2 binary64) a))
(*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 b) a))
(*.f64 (cos.f64 b) a)
(*.f64 a (cos.f64 b))
#s(literal -1/2 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (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)) r))
#s(approx (* r (* (tan b) (tan b))) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (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))) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a 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 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (tan.f64 b) r)))
#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 (cos.f64 b) #s(literal -1/2 binary64))) 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 (cos.f64 b) #s(literal -1/2 binary64))) (*.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 (cos.f64 b) #s(literal -1/2 binary64))) (*.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)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a 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 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (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 (tan.f64 b) r)))
#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 (cos.f64 b) #s(literal -1/2 binary64))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (tan.f64 b) r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (fma.f64 (tan.f64 b) r (/.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 (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (cos.f64 b))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) 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 (- (* (* (cos b) a) -1/2) (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)))
#s(approx (* (* (cos b) a) -1/2) (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)))
#s(approx (* (cos b) a) (*.f64 (cos.f64 b) a))
#s(approx (cos (+ a b)) (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 (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan 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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (neg.f64 (sin.f64 b)) a)) (*.f64 a a)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (-.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (cos.f64 b) (*.f64 a a))) (/.f64 (sin.f64 b) a)) (*.f64 a a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (neg.f64 (sin.f64 b)) a)) a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (neg.f64 a) (*.f64 #s(literal -1 binary64) (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 (neg.f64 a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 b) (/.f64 (sin.f64 b) a))))
#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 (/.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 (+ 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 (/.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 (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.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 (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (cos (+ 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 (* (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 (cos.f64 a) #s(literal -1/2 binary64))) (*.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 (cos.f64 a) #s(literal -1/2 binary64))) (*.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)) (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 (/.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 (+ 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 (/.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 (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/15 binary64) r)) (*.f64 b b) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (cos (+ 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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 b r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 b r) a) (*.f64 #s(literal 1/3 binary64) r)) b (*.f64 a r)) b r) b))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (*.f64 b b) r))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 b b) r) r) (*.f64 b b)))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/3 binary64) r)) (*.f64 b b) r) (*.f64 b b)))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 17/45 binary64) r)) (*.f64 b b) (*.f64 #s(literal 2/3 binary64) r)) (*.f64 b b) r) (*.f64 b b)))
#s(approx (* (tan b) (tan b)) (*.f64 b b))
#s(approx (* (tan b) (tan b)) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 b b) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (* (tan b) (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 b b) #s(literal 2/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (* (tan b) (tan b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 b b) #s(literal 17/45 binary64)) (*.f64 b b) #s(literal 2/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (+.f64 (fma.f64 (neg.f64 a) b (*.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (+.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) b (neg.f64 a)) b (*.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 a b) #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) #s(literal 1/2 binary64))) b (neg.f64 a)) b (*.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 #s(literal -1/2 binary64) a (neg.f64 b)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a b)) #s(literal 1 binary64)) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (- (* (* (cos b) a) -1/2) (sin b)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) a (*.f64 #s(literal 1/6 binary64) b)) b) #s(literal 1 binary64)) b (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (* (cos b) a) -1/2) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (* (* (cos b) a) -1/2) (fma.f64 (*.f64 (*.f64 b b) a) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (* (cos b) a) -1/2) (fma.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 b b) a) (*.f64 #s(literal 1/4 binary64) a)) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (* (cos b) a) -1/2) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/1440 binary64) (*.f64 (*.f64 b b) a) (*.f64 #s(literal -1/48 binary64) a)) (*.f64 b b) (*.f64 #s(literal 1/4 binary64) a)) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) a)))
#s(approx (* (cos b) a) a)
#s(approx (* (cos b) a) (fma.f64 (*.f64 (*.f64 b b) a) #s(literal -1/2 binary64) a))
#s(approx (* (cos b) a) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) a) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) a)) (*.f64 b b) a))
#s(approx (* (cos b) a) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) a) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) a)) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) a)) (*.f64 b b) a))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (tan b) (tan b)) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) 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 (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (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))))

eval86.0ms (1.4%)

Memory
7.8MiB live, 109.5MiB allocated; 65ms collecting garbage
Compiler

Compiled 11 556 to 1 701 computations (85.3% saved)

prune79.0ms (1.3%)

Memory
1.4MiB live, 96.5MiB allocated; 11ms collecting garbage
Pruning

59 alts after pruning (56 fresh and 3 done)

PrunedKeptTotal
New40042442
Fresh21416
Picked325
Done011
Total40559464
Accuracy
99.9%
Counts
464 → 59
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
62.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.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.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (fma.f64 (sin.f64 a) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 a) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 b) (sin.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
99.5%
(/.f64 (*.f64 r (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))))))
62.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #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)))))
62.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #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)))))
62.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
65.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
56.3%
(/.f64 (*.f64 r (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))))
56.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.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))))
57.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
▶66.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
▶60.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a))))
60.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a))))
60.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #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))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #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))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
64.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
41.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
43.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
42.2%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶41.5%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓79.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
64.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
✓62.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
60.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos b) a) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
61.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
57.9%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
32.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a)))))
11.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b)))))
32.8%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
52.8%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
53.0%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
37.2%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
79.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
62.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
61.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a)))
52.9%
#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))
30.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
30.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
30.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓62.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
▶37.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
53.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
34.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
48.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a)))
35.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
36.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b)))
Compiler

Compiled 2 790 to 1 886 computations (32.4% saved)

series79.0ms (1.3%)

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

9 calls:

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

rewrite296.0ms (5%)

Memory
-3.1MiB live, 135.5MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07875383
08454746
146854746
082174494
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
219 → 382
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(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)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (+ a b) b)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 #s(approx (sin b) b) (sin.f64 a))
#s(approx (sin b) b)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) #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 (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)))
(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))
(-.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 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a))
(fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
(*.f64 a a)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(*.f64 (sin.f64 b) (sin.f64 a))
#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 (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (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 (+ (* (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 (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2))))))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 1/24))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 (+ 1/24 (* -1/720 (pow a 2)))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#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 (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* (pow a 6) (- (+ (* 1/24 (/ 1 (pow a 2))) (/ 1 (pow a 6))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 (* (pow a 2) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* 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 (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (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 (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (- (* (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 (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) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(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 b) (cos.f64 a)) #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 b) (cos.f64 a)) #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 2 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(fma.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(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 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 a b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 (*.f64 #s(literal 1 binary64) b))) (*.f64 (sin.f64 a) (sin.f64 (*.f64 #s(literal 1 binary64) b))))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 a (neg.f64 b)))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(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 (neg.f64 (sin.f64 a)) (sin.f64 b))
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (sin.f64 a) (neg.f64 (sin.f64 b)))
(/.f64 (+.f64 (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (fma.f64 #s(literal -1 binary64) b a))) #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 (+.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 (neg.f64 b))
(sin.f64 (+.f64 b (PI.f64)))
(-.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))))
(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)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 #s(approx (tan b) b) r))
(*.f64 #s(approx (tan b) b) r)
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(fma.f64 (sin.f64 #s(approx (+ a b) b)) #s(literal 0 binary64) (*.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)) (*.f64 #s(literal 0 binary64) (sin.f64 #s(approx (+ a b) b))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(approx (+ a b) b)))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 #s(literal 0 binary64) (sin.f64 #s(approx (+ a b) b))))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) b)) #s(literal 0 binary64)) (*.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 #s(approx (+ a b) b) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ a b) b) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(approx (+ a b) b) #s(approx (+ a b) b) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(approx (+ a b) b))
(+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (+ a b) b)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) #s(approx (sin b) b)) #s(literal 2 binary64))) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (sin.f64 a) #s(approx (sin b) b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) #s(approx (sin b) b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) #s(approx (sin b) b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) #s(approx (sin b) b))))))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) #s(approx (sin b) b)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (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 (fma.f64 #s(literal -1 binary64) a (neg.f64 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 b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (sin.f64 a) #s(approx (sin b) b))
(*.f64 #s(approx (sin b) b) (sin.f64 a))
#s(approx (sin b) b)
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))))
(*.f64 #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (cos.f64 b))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a))))
(/.f64 (fma.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 a #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 a #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a))))))
(fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) a) a #s(literal 1 binary64))
(fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))
(fma.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 a a)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a a) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal 3 binary64)) (pow.f64 a #s(literal 6 binary64))) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a)
(*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a a))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
(fma.f64 (*.f64 a a) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 a a)))
(fma.f64 (*.f64 a a) #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(fma.f64 #s(literal 1/24 binary64) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 a a)))
(fma.f64 #s(literal 1/24 binary64) (*.f64 a a) (*.f64 (*.f64 a a) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(+.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(/.f64 (-.f64 #s(literal 1/576 binary64) (pow.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 2 binary64)) #s(literal 1/576 binary64)) (-.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))
(/.f64 (+.f64 #s(literal 1/13824 binary64) (*.f64 #s(literal -1/373248000 binary64) (pow.f64 a #s(literal 6 binary64)))) (+.f64 #s(literal 1/576 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))))
(/.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 a #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) a) a #s(literal 1/24 binary64))
(fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64))
(-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))
(+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) #s(literal -1/720 binary64)))
#s(literal -1/720 binary64)
(*.f64 (exp.f64 (log.f64 a)) (exp.f64 (log.f64 a)))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 (exp.f64 (log.f64 a)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a) #s(literal 2 binary64))
(pow.f64 (neg.f64 a) #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))))
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(*.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))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (tan b)) (*.f64 (tan.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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.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 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#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 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.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 (tan.f64 b) r)))
#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 (*.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) 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 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.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 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#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 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.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 (tan.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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) (neg.f64 (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b))) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64))))))) (*.f64 r (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64)))) #s(literal 1/3 binary64) (neg.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64)))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 3 binary64))))))) a) (*.f64 r (/.f64 (*.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal 2 binary64))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) a (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) a (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) a) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) #s(literal -1/2 binary64))) a (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) a (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (tan.f64 b) r (/.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 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#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 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.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 (tan.f64 b) r)))
#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 (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal 1/24 binary64) (*.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 (*.f64 a a) (cos.f64 b)) #s(literal -1/720 binary64) (*.f64 (cos.f64 b) #s(literal 1/24 binary64))) (*.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 #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 (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (fma.f64 (-.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (-.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (*.f64 a a) #s(literal 1/24 binary64)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(literal 1/24 binary64))
#s(approx (+ (* -1/720 (* a a)) 1/24) (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
#s(approx (* a a) (*.f64 a a))
#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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a)))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a) #s(literal 1 binary64)) a))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 b) (cos.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (pow.f64 a #s(literal 6 binary64)) #s(literal -1/720 binary64)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64))))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (pow.f64 a #s(literal 6 binary64)) (-.f64 (-.f64 (fma.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64) (pow.f64 a #s(literal -6 binary64))) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64))))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal -1/720 binary64)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal -1/720 binary64)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64))))
#s(approx (+ (* -1/720 (* a a)) 1/24) (*.f64 (*.f64 a a) #s(literal -1/720 binary64)))
#s(approx (+ (* -1/720 (* a a)) 1/24) (*.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (*.f64 a 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 (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) (neg.f64 a)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) (neg.f64 a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a)) #s(literal 1 binary64))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* 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 (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.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 (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (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 (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/15 binary64) r)) (*.f64 b b) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) 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 (*.f64 b r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b r) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64))) #s(literal -1 binary64) (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64)))))) b) (*.f64 r (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64))))) b (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64)))) #s(literal -1/6 binary64) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64)))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (*.f64 (*.f64 r (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 3 binary64))))))) b) (*.f64 r (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (pow.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal 2 binary64))))) b (/.f64 r (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))) b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) b) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a)) #s(literal -1/2 binary64))) b (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))) b (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))
#s(approx (/ (* 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 (+ (* (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 (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal -1/2 binary64) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal 1/24 binary64) (*.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) (cos.f64 a)) #s(literal -1/720 binary64) (*.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 (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) (/ (PI) 2)) b)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) b) #s(literal 1 binary64)) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.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) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) (neg.f64 b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) (neg.f64 b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a) b)) #s(literal 1 binary64))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval85.0ms (1.4%)

Memory
-25.2MiB live, 119.5MiB allocated; 21ms collecting garbage
Compiler

Compiled 16 385 to 2 267 computations (86.2% saved)

prune64.0ms (1.1%)

Memory
30.4MiB live, 125.4MiB allocated; 2ms collecting garbage
Pruning

63 alts after pruning (58 fresh and 5 done)

PrunedKeptTotal
New52229551
Fresh222951
Picked325
Done033
Total54763610
Accuracy
99.9%
Counts
610 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
62.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶99.6%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.3%
(/.f64 (*.f64 r (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))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
✓99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
62.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #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)))))
56.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (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))) (sin.f64 a))))
56.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 #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)) (sin.f64 a))))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 #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))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 #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))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
57.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b)) (sin.f64 a))))
57.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #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)))))
57.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #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)))))
▶58.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
60.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
64.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
43.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
42.2%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
41.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
▶18.0%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
18.1%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a)))
✓79.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
64.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
✓62.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) #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))))
38.8%
(/.f64 (*.f64 r (sin.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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))) a (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
61.0%
(/.f64 (*.f64 r (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))))
60.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos b) a) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
57.9%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
▶32.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a)))))
11.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b)))))
32.8%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
52.8%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
53.0%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
37.2%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
55.8%
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
66.0%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))))
60.9%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
79.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
62.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
37.4%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) a))))
53.1%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
61.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a)))
30.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
30.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
30.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓62.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
✓37.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
34.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
48.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a)))
▶35.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
36.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b)))
Compiler

Compiled 3 164 to 2 118 computations (33.1% saved)

series84.0ms (1.4%)

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

9 calls:

TimeVariablePointExpression
10.0ms
a
@0
((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* (+ (* (* b r) a) r) b) (+ (* (* b r) a) r) (* b r) (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos a) (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (+ (* -1/720 (* a a)) 1/24) -1/720 (* a a) 1/24 1/2 1 (* (sin b) (sin a)) (sin a) (* (+ (* -1/6 (* a a)) 1) a) (+ (* -1/6 (* a a)) 1) -1/6 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) -1/2 (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (+ (* (/ (cos b) a) -1) (sin b)) (/ (cos b) a) -1)
10.0ms
r
@inf
((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* (+ (* (* b r) a) r) b) (+ (* (* b r) a) r) (* b r) (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos a) (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (+ (* -1/720 (* a a)) 1/24) -1/720 (* a a) 1/24 1/2 1 (* (sin b) (sin a)) (sin a) (* (+ (* -1/6 (* a a)) 1) a) (+ (* -1/6 (* a a)) 1) -1/6 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) -1/2 (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (+ (* (/ (cos b) a) -1) (sin b)) (/ (cos b) a) -1)
9.0ms
b
@-inf
((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* (+ (* (* b r) a) r) b) (+ (* (* b r) a) r) (* b r) (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos a) (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (+ (* -1/720 (* a a)) 1/24) -1/720 (* a a) 1/24 1/2 1 (* (sin b) (sin a)) (sin a) (* (+ (* -1/6 (* a a)) 1) a) (+ (* -1/6 (* a a)) 1) -1/6 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) -1/2 (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (+ (* (/ (cos b) a) -1) (sin b)) (/ (cos b) a) -1)
9.0ms
r
@-inf
((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* (+ (* (* b r) a) r) b) (+ (* (* b r) a) r) (* b r) (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos a) (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (+ (* -1/720 (* a a)) 1/24) -1/720 (* a a) 1/24 1/2 1 (* (sin b) (sin a)) (sin a) (* (+ (* -1/6 (* a a)) 1) a) (+ (* -1/6 (* a a)) 1) -1/6 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) -1/2 (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (+ (* (/ (cos b) a) -1) (sin b)) (/ (cos b) a) -1)
8.0ms
b
@inf
((/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) (* r (sin b)) r (sin b) b (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) (sin a) a (neg (sin b)) (* (cos b) (cos a)) (cos b) (cos a) (/ (* r (sin b)) (cos (+ a b))) (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (* (+ (* (* b r) a) r) b) (+ (* (* b r) a) r) (* b r) (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) (sin (+ (+ a b) (/ (PI) 2))) (+ (+ a b) (/ (PI) 2)) (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (cos a) (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (+ (* -1/720 (* a a)) 1/24) -1/720 (* a a) 1/24 1/2 1 (* (sin b) (sin a)) (sin a) (* (+ (* -1/6 (* a a)) 1) a) (+ (* -1/6 (* a a)) 1) -1/6 (/ (* r (sin b)) (cos (+ a b))) (cos (+ a b)) (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) -1/2 (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (+ (* (/ (cos b) a) -1) (sin b)) (/ (cos b) a) -1)

rewrite328.0ms (5.5%)

Memory
21.4MiB live, 352.9MiB allocated; 220ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010468017
011187243
160617243
087686915
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
319 → 504
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b))
(*.f64 (fma.f64 (*.f64 b r) a r) b)
(fma.f64 (*.f64 b r) a r)
(*.f64 b r)
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))))
(*.f64 (cos.f64 b) #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 (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)))
(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))
(-.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 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a))
(fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
(*.f64 a a)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(*.f64 (sin.f64 b) #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 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)
(fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a)))))
#s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a)))
(*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))) (*.f64 a a))
(fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a)))
#s(literal -1/2 binary64)
(neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))
(/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a)
(fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b))
(/.f64 (cos.f64 b) a)
#s(literal -1 binary64)
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* r (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* b (* r (+ 1 (* a b))))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* r (+ 1 (* a b)))))
#s(approx (* b r) #s(hole binary64 (* b r)))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (+ a (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* -1 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* -1 (* b (* r (- (* -1 (* a b)) 1))))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* -1 (* r (- (* -1 (* a b)) 1)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx a #s(hole binary64 a))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* b r)))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (+ (* a (* (pow b 2) r)) (* b r))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 r))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (+ r (* a (* b r)))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (cos (+ b (* 1/2 (PI)))) (sin b)))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* (cos (+ b (* 1/2 (PI)))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI)))))))) (sin (+ b (* 1/2 (PI)))))) (+ (* -1/6 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))) (* 1/2 (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* r (* (pow (cos (+ b (* 1/2 (PI)))) 2) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 3))) (* -1/2 (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))) (/ (* r (* (cos (+ b (* 1/2 (PI)))) (sin b))) (pow (sin (+ b (* 1/2 (PI)))) 2)))) (/ (* r (sin b)) (sin (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (cos (+ b (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* -1/2 (* a (sin (+ b (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ b (* 1/2 (PI)))) (* a (+ (cos (+ b (* 1/2 (PI)))) (* a (+ (* -1/2 (sin (+ b (* 1/2 (PI))))) (* -1/6 (* a (cos (+ b (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ b (* 1/2 (PI)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (+ b (* 1/2 (PI))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (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 (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (- (* 1/24 (pow a 2)) 1/2)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* 1/24 (pow a 2))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2))))))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 1/24))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 (+ 1/24 (* -1/720 (pow a 2)))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) #s(hole binary64 a))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (+ (* -1/6 (* a a)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/6 (* a a)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow a 2)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (cos b)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (/ (cos b) (pow a 2))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (/ (- (* -1 (* a (sin b))) (* -1 (cos b))) (pow a 2))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (/ (- (* a (- (* -1/2 (* a (cos b))) (sin b))) (* -1 (cos b))) (pow a 2))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (/ (cos b) (pow a 2))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (/ (- (* -1 (* a (sin b))) (* -1 (cos b))) (pow a 2))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (* -1 (/ (cos b) (pow a 2)))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (/ (+ (* -1 (cos b)) (* a (sin b))) (pow a 2))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (* -1 (/ (cos b) a))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (/ (+ (* -1 (cos b)) (* a (sin b))) a)))
#s(approx (/ (cos b) a) #s(hole binary64 (/ (cos b) a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* a (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* a (* (pow b 2) r))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* a (+ (* (pow b 2) r) (/ (* b r) a)))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* a (* b r))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* a (+ (* b r) (/ r a)))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (+ b (* 1/2 (PI)))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 a))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* a (+ 1 (+ (* 1/2 (/ (PI) a)) (/ b a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* -1/720 (pow a 6))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* (pow a 6) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(hole binary64 (* (pow a 6) (- (+ (* 1/24 (/ 1 (pow a 2))) (/ 1 (pow a 6))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) (+ 1/720 (/ 1/2 (pow a 4)))))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* -1/720 (pow a 4))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) #s(hole binary64 (* (pow a 4) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 (* -1/720 (pow a 2))))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(hole binary64 (* (pow a 2) (- (* 1/24 (/ 1 (pow a 2))) 1/720))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) #s(hole binary64 (* -1/6 (pow a 3))))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) #s(hole binary64 (* (pow a 3) (- (/ 1 (pow a 2)) 1/6))))
#s(approx (+ (* -1/6 (* a a)) 1) #s(hole binary64 (* -1/6 (pow a 2))))
#s(approx (+ (* -1/6 (* a a)) 1) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow a 2)) 1/6))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (* -1/2 (* (pow a 2) (cos b)))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b))))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (sin b) a)) (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2)))))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (* -1/2 (cos b))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (+ (* -1 (/ (sin b) a)) (* -1/2 (cos b)))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (- (+ (* -1/2 (cos b)) (/ (cos b) (pow a 2))) (/ (sin b) a))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (* -1 (/ (sin b) a))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (/ (- (/ (cos b) a) (sin b)) a)))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (/ (sin b) a)))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (sin b)))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (+ (sin b) (* -1 (/ (cos b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* -1 (* a (+ (* -1 (* (pow b 2) r)) (* -1 (/ (* b r) a)))))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* -1 (* a (+ (* -1 (* b r)) (* -1 (/ r a)))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ b (* 1/2 (PI))) (* -1 a))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ b (* 1/2 (PI))) (* -1 a)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (+ b (* 1/2 (PI))) a)) 1)))))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) #s(hole binary64 (* -1 (* (pow a 3) (- 1/6 (/ 1 (pow a 2)))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sin b) (* -1 (/ (cos b) a))) a)) (* -1/2 (cos b))))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (cos b) a)) (* -1 (sin b))) a)) (* -1/2 (cos b)))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (cos b) a)) (* -1 (sin b))) a))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (* -1 (/ (+ (* -1 (sin b)) (/ (cos b) a)) a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos b) (cos a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* 1/3 (* b r)) (* a r)))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* a r) (* b (+ (* 1/3 r) (* 2/3 (* a (* b r)))))))))))
#s(approx (* (+ (* (* b r) a) r) b) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* b r) (sin (+ a (* 1/2 (PI)))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (cos (+ a (* 1/2 (PI)))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1/6 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2))) (/ (* (cos (+ a (* 1/2 (PI)))) (- (* -1/6 (/ r (sin (+ a (* 1/2 (PI)))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (sin (+ a (* 1/2 (PI))))))))) (* -1/6 (/ r (sin (+ a (* 1/2 (PI))))))) (+ (* -1 (/ (* r (pow (cos (+ a (* 1/2 (PI)))) 2)) (pow (sin (+ a (* 1/2 (PI)))) 3))) (* -1/2 (/ r (sin (+ a (* 1/2 (PI))))))))) (/ (* r (cos (+ a (* 1/2 (PI))))) (pow (sin (+ a (* 1/2 (PI)))) 2)))) (/ r (sin (+ a (* 1/2 (PI)))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (+ a (* 1/2 (PI))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (cos (+ a (* 1/2 (PI))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* -1/2 (* b (sin (+ a (* 1/2 (PI)))))))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ a (* 1/2 (PI)))) (* b (+ (cos (+ a (* 1/2 (PI)))) (* b (+ (* -1/2 (sin (+ a (* 1/2 (PI))))) (* -1/6 (* b (cos (+ a (* 1/2 (PI)))))))))))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (+ a (* 1/2 (PI)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (- (* (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 (* (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 (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 (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1 (* a b)) (* -1/2 (pow a 2))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (* 1/4 (pow a 2)) 1/2))))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow a 2)) (* b (+ (* -1 a) (* b (- (+ (* 1/6 (* a b)) (* 1/4 (pow a 2))) 1/2))))))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow a 2)) 1/2))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (+ (* -1 (* a b)) (* (pow a 2) (- (/ 1 (pow a 2)) 1/2)))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (+ (* b (+ (* -1 a) (* (pow a 2) (* b (- 1/4 (* 1/2 (/ 1 (pow a 2)))))))) (* (pow a 2) (- (/ 1 (pow a 2)) 1/2)))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (+ (* b (+ (* -1 a) (* b (+ (* 1/6 (* a b)) (* (pow a 2) (- 1/4 (* 1/2 (/ 1 (pow a 2))))))))) (* (pow a 2) (- (/ 1 (pow a 2)) 1/2)))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (- (/ 1 (pow a 2)) 1/2)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (- (+ (* -1 (/ b a)) (/ 1 (pow a 2))) 1/2)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (- (+ (* b (- (* b (- 1/4 (* 1/2 (/ 1 (pow a 2))))) (/ 1 a))) (/ 1 (pow a 2))) 1/2)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (- (+ (* b (- (* b (- (+ 1/4 (* 1/6 (/ b a))) (* 1/2 (/ 1 (pow a 2))))) (/ 1 a))) (/ 1 (pow a 2))) 1/2)))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (/ 1 (pow a 2))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ 1 (pow a 2)))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (+ (* b (- (* -1/2 (/ b (pow a 2))) (/ 1 a))) (/ 1 (pow a 2)))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (+ (* b (- (* b (- (* 1/6 (/ b a)) (* 1/2 (/ 1 (pow a 2))))) (/ 1 a))) (/ 1 (pow a 2)))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (/ -1 (pow a 2))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (- (/ b a) (/ 1 (pow a 2)))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (- (* b (+ (* 1/2 (/ b (pow a 2))) (/ 1 a))) (/ 1 (pow a 2)))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) #s(hole binary64 (- (* b (+ (* b (+ (* -1/6 (/ b a)) (* 1/2 (/ 1 (pow a 2))))) (/ 1 a))) (/ 1 (pow a 2)))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (/ -1 a)))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (- b (/ 1 a))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (- (* b (+ 1 (* 1/2 (/ b a)))) (/ 1 a))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) #s(hole binary64 (- (* b (+ 1 (* b (+ (* -1/6 b) (* 1/2 (/ 1 a)))))) (/ 1 a))))
#s(approx (/ (cos b) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (cos b) a) #s(hole binary64 (+ (* -1/2 (/ (pow b 2) a)) (/ 1 a))))
#s(approx (/ (cos b) a) #s(hole binary64 (+ (* (pow b 2) (- (* 1/24 (/ (pow b 2) a)) (* 1/2 (/ 1 a)))) (/ 1 a))))
#s(approx (/ (cos b) a) #s(hole binary64 (+ (* (pow b 2) (- (* (pow b 2) (+ (* -1/720 (/ (pow b 2) a)) (* 1/24 (/ 1 a)))) (* 1/2 (/ 1 a)))) (/ 1 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 (* (+ (* (* b r) a) r) b) #s(hole binary64 (* (pow b 2) (+ (* a r) (/ r b)))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* b (+ (* a r) (/ r b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 b))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* b (+ 1 (+ (* 1/2 (/ (PI) b)) (/ a b))))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) #s(hole binary64 (* (pow a 2) (- (* -1/2 (cos b)) (+ (* -1 (/ (cos b) (pow a 2))) (/ (sin b) a))))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) #s(hole binary64 (- (* -1/2 (cos b)) (+ (* -1 (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) #s(hole binary64 (* -1 (+ (* -1 (/ (cos b) (pow a 2))) (/ (sin b) a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (+ (* (* b r) a) r) #s(hole binary64 (* -1 (* b (+ (* -1 (* a r)) (* -1 (/ r b)))))))
#s(approx (/ (* r (sin b)) (sin (+ (+ a b) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ a (* 1/2 (PI))) (* -1 b))))))
#s(approx (sin (+ (+ a b) (/ (PI) 2))) #s(hole binary64 (sin (- (+ a (* 1/2 (PI))) (* -1 b)))))
#s(approx (+ (+ a b) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (+ a (* 1/2 (PI))) b)) 1)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))))
(fma.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(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 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 a b)))
(-.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 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 a (neg.f64 b)))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a)))
(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 (neg.f64 b))
(sin.f64 (+.f64 b (PI.f64)))
(-.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 b) (cos.f64 a))
(*.f64 (cos.f64 a) (cos.f64 b))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (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 (fma.f64 #s(literal -1 binary64) a (neg.f64 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 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 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)))
(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)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b))
(*.f64 (fma.f64 (*.f64 b r) a r) b)
(*.f64 b (fma.f64 (*.f64 b r) a r))
(fma.f64 b r (*.f64 (*.f64 (*.f64 a b) r) b))
(fma.f64 b r (*.f64 b (*.f64 (*.f64 a b) r)))
(fma.f64 r b (*.f64 (*.f64 (*.f64 a b) r) b))
(fma.f64 r b (*.f64 b (*.f64 (*.f64 a b) r)))
(+.f64 (*.f64 b r) (*.f64 (*.f64 (*.f64 a b) r) b))
(+.f64 (*.f64 b r) (*.f64 b (*.f64 (*.f64 a b) r)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a b) r) (*.f64 (*.f64 a b) r)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 a b) r) r))
(/.f64 (-.f64 (*.f64 r r) (*.f64 (*.f64 (*.f64 a b) r) (*.f64 (*.f64 a b) r))) (-.f64 r (*.f64 (*.f64 a b) r)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a b) r) #s(literal 3 binary64)) (pow.f64 r #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a b) r) (*.f64 (*.f64 a b) r) (-.f64 (*.f64 r r) (*.f64 (*.f64 (*.f64 a b) r) r))))
(/.f64 (+.f64 (pow.f64 r #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a b) r) #s(literal 3 binary64))) (fma.f64 r r (-.f64 (*.f64 (*.f64 (*.f64 a b) r) (*.f64 (*.f64 a b) r)) (*.f64 r (*.f64 (*.f64 a b) r)))))
(fma.f64 (*.f64 a b) r r)
(fma.f64 (*.f64 b r) a r)
(fma.f64 a (*.f64 b r) r)
(fma.f64 b (*.f64 a r) r)
(-.f64 r (*.f64 (neg.f64 a) (*.f64 b r)))
(+.f64 (*.f64 (*.f64 a b) r) r)
(+.f64 r (*.f64 (*.f64 a b) r))
(*.f64 b r)
(*.f64 r b)
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
(/.f64 (*.f64 (sin.f64 b) r) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
(sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))))) (*.f64 (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b)) (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b)))) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (fma.f64 (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b)) (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b))))))
(fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))))
(fma.f64 #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))))
(-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b)))
(+.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))))
(*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))))
(*.f64 #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (cos.f64 b))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a))) #s(literal 1 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a))))))
(fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) a) a #s(literal 1 binary64))
(fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))
(fma.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 a a)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a)) #s(literal 1/4 binary64)) (fma.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a a) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a)
(*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a a))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
(fma.f64 (*.f64 a a) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 a a)))
(fma.f64 (*.f64 a a) #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(fma.f64 #s(literal 1/24 binary64) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 a a)))
(fma.f64 #s(literal 1/24 binary64) (*.f64 a a) (*.f64 (*.f64 a a) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(+.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(/.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 (*.f64 a a) #s(literal -1/720 binary64)))) (-.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))) #s(literal 1/576 binary64)) (-.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))
(/.f64 (+.f64 #s(literal 1/13824 binary64) (pow.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/576 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) #s(literal -1/720 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) #s(literal -1/373248000 binary64) #s(literal 1/13824 binary64)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) a) a #s(literal 1/24 binary64))
(fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64))
(-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))
(+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) #s(literal -1/720 binary64)))
#s(literal -1/720 binary64)
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64)))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))))
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(*.f64 #s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)) (sin.f64 b))
(*.f64 (sin.f64 b) #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 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
(*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a)
(*.f64 a (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) a (*.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) a))
(fma.f64 a #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a a) #s(literal -1/6 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) a))
(+.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 a (*.f64 (*.f64 a a) #s(literal -1/6 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) (*.f64 (*.f64 a a) #s(literal -1/6 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) (*.f64 (*.f64 a a) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) (*.f64 (*.f64 a a) #s(literal -1/6 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(literal -1/6 binary64))))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (*.f64 a a) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(fma.f64 (*.f64 #s(literal -1/6 binary64) a) a #s(literal 1 binary64))
(fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) #s(literal -1/6 binary64)))
#s(literal -1/6 binary64)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a))))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) a) a)
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))))
(fma.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 a a) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 a a)))
(fma.f64 (*.f64 a a) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))))
(+.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 a a)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))) (-.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (-.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a) #s(literal 3 binary64)) #s(literal -1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (fma.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))))))
(fma.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a) #s(literal -1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))
(fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)))
(fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)))
(-.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 #s(literal 1/2 binary64) (cos.f64 b)))
(+.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))
(/.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b))) a)
(/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b))) a)
(/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))
(neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))
(/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b))) (neg.f64 a))
(/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a)
(+.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 b)) a) a) (/.f64 (sin.f64 b) a))
(+.f64 (/.f64 (sin.f64 b) a) (/.f64 (/.f64 (neg.f64 (cos.f64 b)) a) a))
(/.f64 (-.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (/.f64 (neg.f64 (cos.f64 b)) a)) (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (-.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (sin.f64 b)))
(/.f64 (-.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (/.f64 (neg.f64 (cos.f64 b)) a))) (-.f64 (sin.f64 b) (/.f64 (neg.f64 (cos.f64 b)) a)))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 b) a) #s(literal 3 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (fma.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (/.f64 (neg.f64 (cos.f64 b)) a) (-.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (*.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (sin.f64 b)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (cos.f64 b)) a) #s(literal 3 binary64))) (fma.f64 (sin.f64 b) (sin.f64 b) (-.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (/.f64 (neg.f64 (cos.f64 b)) a)) (*.f64 (sin.f64 b) (/.f64 (neg.f64 (cos.f64 b)) a)))))
(fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 b) a) (sin.f64 b))
(-.f64 (sin.f64 b) (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) a)))
(+.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (sin.f64 b))
(+.f64 (sin.f64 b) (/.f64 (neg.f64 (cos.f64 b)) a))
(/.f64 (neg.f64 (cos.f64 b)) (neg.f64 a))
(/.f64 (cos.f64 b) a)
#s(literal -1 binary64)
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (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)) r))
#s(approx (* (+ (* (* b r) a) r) b) (*.f64 (*.f64 (fma.f64 a b #s(literal 1 binary64)) r) b))
#s(approx (+ (* (* b r) a) r) (*.f64 (fma.f64 a b #s(literal 1 binary64)) r))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (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))) r)))
#s(approx (* (+ (* (* b r) a) r) b) (*.f64 (neg.f64 b) (*.f64 (-.f64 (*.f64 (neg.f64 a) b) #s(literal 1 binary64)) r)))
#s(approx (+ (* (* b r) a) r) (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) b) #s(literal 1 binary64)) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.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)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.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 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (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)) (* (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 (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx a a)
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) (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 (*.f64 a a) #s(literal -1/720 binary64)) (cos.f64 b) (*.f64 (cos.f64 b) #s(literal 1/24 binary64))) (*.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 (*.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.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)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.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 (tan.f64 b) r)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (tan.f64 b) r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (fma.f64 (tan.f64 b) r (/.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 (* (+ (* (* b r) a) r) b) (*.f64 b r))
#s(approx (* (+ (* (* b r) a) r) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))
#s(approx (+ (* (* b r) a) r) r)
#s(approx (+ (* (* b r) a) r) (fma.f64 (*.f64 b r) a r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) (neg.f64 (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (sin.f64 b))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 3 binary64))))))) (*.f64 r (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64)))) #s(literal 1/3 binary64) (neg.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 3 binary64)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 3 binary64))))))) a) (*.f64 r (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (sin.f64 b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal 2 binary64))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) a (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) a (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) a) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) #s(literal -1/2 binary64))) a (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) a (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))
#s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.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)) (* (sin b) (sin a)))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (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 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 (*.f64 (tan.f64 b) r) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.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 (tan.f64 b) r)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) (* (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 (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (fma.f64 (-.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (-.f64 (*.f64 (*.f64 a a) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (*.f64 a a) #s(literal 1/24 binary64)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a))
#s(approx (+ (* -1/720 (* a a)) 1/24) #s(literal 1/24 binary64))
#s(approx (+ (* -1/720 (* a a)) 1/24) (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
#s(approx (* a a) (*.f64 a a))
#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 (* (+ (* -1/6 (* a a)) 1) a) a)
#s(approx (* (+ (* -1/6 (* a a)) 1) a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (+ (* -1/6 (* a a)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/6 (* a a)) 1) (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) (* (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 (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (cos.f64 b))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) 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 (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (cos.f64 b))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a 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) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (/.f64 (cos.f64 b) (*.f64 a a)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (/.f64 (fma.f64 (neg.f64 a) (sin.f64 b) (*.f64 #s(literal 1 binary64) (cos.f64 b))) (*.f64 a a)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (*.f64 #s(literal 1 binary64) (cos.f64 b))) (*.f64 a a)))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/.f64 (cos.f64 b) (*.f64 a a)))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/.f64 (fma.f64 (neg.f64 a) (sin.f64 b) (*.f64 #s(literal 1 binary64) (cos.f64 b))) (*.f64 a a)))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (/.f64 (neg.f64 (cos.f64 b)) (*.f64 a a)))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (/.f64 (fma.f64 (sin.f64 b) a (neg.f64 (cos.f64 b))) (*.f64 a a)))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (/.f64 (neg.f64 (cos.f64 b)) a))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (/.f64 (fma.f64 (sin.f64 b) a (neg.f64 (cos.f64 b))) a))
#s(approx (/ (cos b) a) (/.f64 (cos.f64 b) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 b) (cos.f64 a)))
#s(approx (cos a) (cos.f64 a))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan 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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a))
#s(approx (* (+ (* (* b r) a) r) b) (*.f64 (*.f64 (*.f64 b b) r) a))
#s(approx (* (+ (* (* b r) a) r) b) (*.f64 (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)) a))
#s(approx (+ (* (* b r) a) r) (*.f64 (*.f64 a b) r))
#s(approx (+ (* (* b r) a) r) (*.f64 (fma.f64 b r (/.f64 r a)) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) a)))
#s(approx (+ (+ a b) (/ (PI) 2)) a)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) a) #s(literal 1 binary64)) a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (pow.f64 a #s(literal 6 binary64)) #s(literal -1/720 binary64)))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (pow.f64 a #s(literal 6 binary64))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))) (pow.f64 a #s(literal 6 binary64))))
#s(approx (+ (* (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (* a a)) 1) (*.f64 (-.f64 (fma.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64) (pow.f64 a #s(literal -6 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64))) #s(literal 1/720 binary64))) (pow.f64 a #s(literal 6 binary64))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal -1/720 binary64)))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64))))
#s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal -1/720 binary64)))
#s(approx (* (+ (* -1/720 (* a a)) 1/24) (* a a)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64))))
#s(approx (+ (* -1/720 (* a a)) 1/24) (*.f64 (*.f64 a a) #s(literal -1/720 binary64)))
#s(approx (+ (* -1/720 (* a a)) 1/24) (*.f64 (-.f64 (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/24 binary64)) #s(literal 1/720 binary64)) (*.f64 a a)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) (*.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1/6 binary64)))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) (*.f64 (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 a #s(literal 3 binary64))))
#s(approx (+ (* -1/6 (* a a)) 1) (*.f64 (*.f64 a a) #s(literal -1/6 binary64)))
#s(approx (+ (* -1/6 (* a a)) 1) (*.f64 (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/6 binary64)) (*.f64 a a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (neg.f64 (sin.f64 b)) a)) (*.f64 a a)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (cos.f64 b) (*.f64 a a))) (/.f64 (sin.f64 b) a)) (*.f64 a a)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (neg.f64 (sin.f64 b)) a)) (*.f64 a a)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (*.f64 (fma.f64 (/.f64 (sin.f64 b) a) #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (cos.f64 b) (*.f64 a a)))) (*.f64 a a)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (neg.f64 (sin.f64 b)) a)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (cos.f64 b) (*.f64 a a))) (/.f64 (sin.f64 b) a)))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/.f64 (neg.f64 (sin.f64 b)) a))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (/.f64 (-.f64 (/.f64 (cos.f64 b) a) (sin.f64 b)) a))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (/.f64 (sin.f64 b) a))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) a))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (sin.f64 b))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (neg.f64 a) (*.f64 #s(literal -1 binary64) (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))
#s(approx (* (+ (* (* b r) a) r) b) (*.f64 (neg.f64 a) (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 b b) r (/.f64 (*.f64 b r) a)))))
#s(approx (+ (* (* b r) a) r) (*.f64 (neg.f64 a) (*.f64 #s(literal -1 binary64) (fma.f64 b r (/.f64 r a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) (neg.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) (neg.f64 a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b) a)) #s(literal 1 binary64))))
#s(approx (* (+ (* -1/6 (* a a)) 1) a) (*.f64 (pow.f64 (neg.f64 a) #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (pow.f64 a #s(literal -2 binary64)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a))) (*.f64 a a)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 b) (neg.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (neg.f64 (sin.f64 b))) a))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (neg.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (cos.f64 b)) a) (neg.f64 (sin.f64 b))) a)))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (neg.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 b) (/.f64 (cos.f64 b) a)) a)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.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)) (* (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 (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.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 (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (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)) (* (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 (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 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 (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.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)) (* (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 b r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 a b) r) (*.f64 #s(literal 1/3 binary64) r)) b (*.f64 a r)) b r) b))
#s(approx (* (+ (* (* b r) a) r) b) (*.f64 (fma.f64 (*.f64 b r) a r) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b r) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64))) #s(literal -1 binary64) (/.f64 r (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 3 binary64)))))) b) (*.f64 r (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64))))) b (/.f64 r (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64)))) #s(literal -1/6 binary64) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 3 binary64)))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) (*.f64 (*.f64 r (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) (fma.f64 (/.f64 r (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 3 binary64))))))) b) (*.f64 r (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal 2 binary64))))) b (/.f64 r (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)))) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) b (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) b (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) b) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a)) #s(literal -1/2 binary64))) b (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))) b (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
#s(approx (+ (+ a b) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.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)) (* (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 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) (* (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 (* (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 (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (-.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)) (* (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 (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (+.f64 (fma.f64 (neg.f64 a) b (*.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (+.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) b (neg.f64 a)) b (*.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 a b) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) #s(literal 1/2 binary64))) b (neg.f64 a)) b (*.f64 (*.f64 a a) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (*.f64 (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 a a)))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (fma.f64 (neg.f64 a) b (*.f64 (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 a a))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) b) (-.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))) (neg.f64 a)) b (*.f64 (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 a a))))
#s(approx (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) b (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 a a))) b (neg.f64 a)) b (*.f64 (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 a a))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (fma.f64 (/.f64 b a) #s(literal -1 binary64) (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))) b) (pow.f64 a #s(literal -1 binary64))) b (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (/.f64 b a) #s(literal 1/6 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))) b) (pow.f64 a #s(literal -1 binary64))) b (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (pow.f64 a #s(literal -2 binary64)))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (fma.f64 (/.f64 b a) #s(literal -1 binary64) (pow.f64 a #s(literal -2 binary64))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (fma.f64 (-.f64 (*.f64 (/.f64 b (*.f64 a a)) #s(literal -1/2 binary64)) (pow.f64 a #s(literal -1 binary64))) b (pow.f64 a #s(literal -2 binary64))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 b a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal -2 binary64)))) b) (pow.f64 a #s(literal -1 binary64))) b (pow.f64 a #s(literal -2 binary64))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (/.f64 #s(literal -1 binary64) (*.f64 a a)))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (-.f64 (/.f64 b a) (pow.f64 a #s(literal -2 binary64))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (-.f64 (*.f64 (fma.f64 (/.f64 b (*.f64 a a)) #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64))) b) (pow.f64 a #s(literal -2 binary64))))
#s(approx (/ (+ (* (/ (cos b) a) -1) (sin b)) a) (-.f64 (*.f64 (fma.f64 (fma.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64) (*.f64 (/.f64 b a) #s(literal -1/6 binary64))) b (pow.f64 a #s(literal -1 binary64))) b) (pow.f64 a #s(literal -2 binary64))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (/.f64 #s(literal -1 binary64) a))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (-.f64 b (pow.f64 a #s(literal -1 binary64))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (-.f64 (*.f64 (fma.f64 (/.f64 b a) #s(literal 1/2 binary64) #s(literal 1 binary64)) b) (pow.f64 a #s(literal -1 binary64))))
#s(approx (+ (* (/ (cos b) a) -1) (sin b)) (-.f64 (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) b (/.f64 #s(literal 1/2 binary64) a)) b #s(literal 1 binary64)) b) (pow.f64 a #s(literal -1 binary64))))
#s(approx (/ (cos b) a) (pow.f64 a #s(literal -1 binary64)))
#s(approx (/ (cos b) a) (fma.f64 (/.f64 (*.f64 b b) a) #s(literal -1/2 binary64) (pow.f64 a #s(literal -1 binary64))))
#s(approx (/ (cos b) a) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) a) #s(literal 1/24 binary64)) (/.f64 #s(literal 1/2 binary64) a)) (*.f64 b b) (pow.f64 a #s(literal -1 binary64))))
#s(approx (/ (cos b) a) (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 b b) a) #s(literal -1/720 binary64) (/.f64 #s(literal 1/24 binary64) a)) (*.f64 b b)) (/.f64 #s(literal 1/2 binary64) a)) (*.f64 b b) (pow.f64 a #s(literal -1 binary64))))
#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 (* (+ (* (* b r) a) r) b) (*.f64 (fma.f64 a r (/.f64 r b)) (*.f64 b b)))
#s(approx (+ (* (* b r) a) r) (*.f64 (fma.f64 a r (/.f64 r b)) b))
#s(approx (+ (+ a b) (/ (PI) 2)) b)
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a) b) #s(literal 1 binary64)) b))
#s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) 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 (* (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (* a a)) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (fma.f64 (/.f64 (cos.f64 b) (*.f64 a a)) #s(literal -1 binary64) (/.f64 (sin.f64 b) a))) (*.f64 a a)))
#s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (fma.f64 (/.f64 (cos.f64 b) (*.f64 a a)) #s(literal -1 binary64) (/.f64 (sin.f64 b) a))))
#s(approx (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a)) (neg.f64 (fma.f64 (/.f64 (cos.f64 b) (*.f64 a a)) #s(literal -1 binary64) (/.f64 (sin.f64 b) a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (+ (* (* b r) a) r) (*.f64 (neg.f64 b) (*.f64 #s(literal -1 binary64) (fma.f64 a r (/.f64 r b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a) (neg.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a) (neg.f64 b))))
#s(approx (+ (+ a b) (/ (PI) 2)) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a) b)) #s(literal 1 binary64))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (cos.f64 (+.f64 a b)))

eval116.0ms (2%)

Memory
16.6MiB live, 161.2MiB allocated; 57ms collecting garbage
Compiler

Compiled 27 301 to 3 189 computations (88.3% saved)

prune103.0ms (1.7%)

Memory
-31.3MiB live, 163.3MiB allocated; 17ms collecting garbage
Pruning

77 alts after pruning (69 fresh and 8 done)

PrunedKeptTotal
New62532657
Fresh163753
Picked235
Done055
Total64377720
Accuracy
99.9%
Counts
720 → 77
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.4%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
62.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
99.3%
(/.f64 (*.f64 r (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 b) (cos.f64 a))))
✓99.6%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #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))) (cos.f64 a))))
53.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #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))) (cos.f64 a))))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a))))
64.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 b))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos b) (cos a)) (cos.f64 a))))
56.3%
(/.f64 (*.f64 r (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 b) (cos.f64 a))))
57.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (*.f64 (cos.f64 b) (cos.f64 a))))
56.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) #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)) (*.f64 (cos.f64 b) (cos.f64 a))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 a) #s(literal -1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.3%
(/.f64 (*.f64 r (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))))
99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
✓99.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
62.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #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)))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
57.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #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)))))
57.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #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)))))
✓58.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #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)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
58.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(approx (+ (* -1/720 (* a a)) 1/24) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
57.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 #s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal -1/720 binary64))) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
58.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 #s(approx (- (* (+ (* -1/720 (* a a)) 1/24) (* a a)) 1/2) #s(literal -1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 #s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
57.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
54.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
43.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
42.2%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
41.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b) a))))
18.1%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) a)))
✓79.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
64.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
✓62.9%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
53.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (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))))
38.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))) a (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)))))
61.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
60.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 #s(approx (* (cos b) a) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
30.2%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 b) a) #s(literal -1 binary64) (sin.f64 b)) (neg.f64 a)) (*.f64 a a) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 b)) (*.f64 a a))))))
37.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
32.2%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (fma.f64 (cos.f64 b) #s(literal -1/2 binary64) (neg.f64 (/.f64 #s(approx (+ (* (/ (cos b) a) -1) (sin b)) (/.f64 (neg.f64 (cos.f64 b)) a)) a))) (*.f64 a a)))))
11.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b)))))
22.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) #s(approx (+ (* (- (* (* (cos b) a) -1/2) (sin b)) a) (cos b)) (*.f64 #s(approx (+ (* (cos b) -1/2) (neg (/ (+ (* (/ (cos b) a) -1) (sin b)) a))) (-.f64 (pow.f64 a #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 a a)))))
32.8%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
52.8%
(/.f64 (*.f64 r #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)))
15.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b)))
53.0%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
37.2%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
55.8%
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
66.0%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a)))))
60.9%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) a) a) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
7.1%
(*.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (+ (+ a b) (/ (PI) 2)) b))))
79.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
62.9%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
37.4%
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
53.1%
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
61.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (tan.f64 b) r (*.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a)))
30.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
30.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
30.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓62.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
✓37.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
48.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) a)))
✓35.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
34.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 a b) r r) b)))
34.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 b (*.f64 a r) r) b)))
24.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a b) r) (*.f64 (*.f64 a b) r)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 a b) r) r)) b)))
28.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 #s(approx (+ (* (* b r) a) r) (*.f64 (fma.f64 a r (/.f64 r b)) b)) b)))
14.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 #s(approx (+ (* (* b r) a) r) (*.f64 (*.f64 a b) r)) b)))
34.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 #s(approx (+ (* (* b r) a) r) (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) b) #s(literal 1 binary64)) r))) b)))
35.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(approx (* (+ (* (* b r) a) r) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))))
25.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(approx (* (+ (* (* b r) a) r) b) (*.f64 (fma.f64 a r (/.f64 r b)) (*.f64 b b)))))
15.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(approx (* (+ (* (* b r) a) r) b) (*.f64 (*.f64 (*.f64 b b) r) a))))
36.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b)))
Compiler

Compiled 5 654 to 2 070 computations (63.4% saved)

regimes177.0ms (3%)

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

4 calls:

66.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
41.0ms
b
34.0ms
r
30.0ms
a
Results
AccuracySegmentsBranch
99.6%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.6%1r
99.6%1a
99.6%1b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes120.0ms (2%)

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

4 calls:

32.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
29.0ms
b
28.0ms
r
26.0ms
a
Results
AccuracySegmentsBranch
99.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.5%1r
99.5%1a
99.5%1b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes140.0ms (2.4%)

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

4 calls:

50.0ms
a
32.0ms
r
28.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
26.0ms
b
Results
AccuracySegmentsBranch
99.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.5%1r
99.5%1a
99.5%1b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes192.0ms (3.2%)

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

4 calls:

72.0ms
r
62.0ms
a
28.0ms
b
25.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
79.5%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
79.5%1r
79.5%1a
79.5%1b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes66.0ms (1.1%)

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

4 calls:

39.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
8.0ms
r
8.0ms
a
8.0ms
b
Results
AccuracySegmentsBranch
78.6%3b
68.5%3r
62.9%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
78.7%3a
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes17.0ms (0.3%)

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

2 calls:

7.0ms
a
7.0ms
b
Results
AccuracySegmentsBranch
78.6%3b
77.4%3a
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes31.0ms (0.5%)

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

1 calls:

7.0ms
b
Results
AccuracySegmentsBranch
78.6%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes7.0ms (0.1%)

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

1 calls:

6.0ms
b
Results
AccuracySegmentsBranch
78.6%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes41.0ms (0.7%)

Memory
-25.9MiB live, 23.3MiB allocated; 8ms collecting garbage
Counts
16 → 1
Calls
Call 1
Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(approx (* (+ (* (* b r) a) r) b) (*.f64 (*.f64 (*.f64 b b) r) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 #s(approx (+ (* (* b r) a) r) (*.f64 (*.f64 a b) r)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 b (*.f64 a r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 a b) r r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(approx (* (+ (* (* b r) a) r) b) (fma.f64 (*.f64 (*.f64 b b) r) a (*.f64 b r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 #s(approx (+ (* (* b r) a) r) (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a) b) #s(literal 1 binary64)) r))) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(approx (* (+ (* (* b r) a) r) b) (*.f64 (fma.f64 a r (/.f64 r b)) (*.f64 b b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 #s(approx (+ (* (* b r) a) r) (*.f64 (fma.f64 a r (/.f64 r b)) b)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a b) r) (*.f64 (*.f64 a b) r)) (*.f64 r r)) (-.f64 (*.f64 (*.f64 a b) r) r)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
Calls

3 calls:

30.0ms
a
5.0ms
r
5.0ms
b
Results
AccuracySegmentsBranch
62.9%1r
62.9%1a
62.9%1b
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes16.0ms (0.3%)

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

Total -15.5b remaining (-38.7%)

Threshold costs -15.5b (-38.7%)

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

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

bsearch52.0ms (0.9%)

Memory
-17.8MiB live, 72.0MiB allocated; 8ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
18.0ms
1.787594677925389e-7
3.078893145433647e-6
30.0ms
-496980490.81481826
-104.88715646022692
Samples
22.0ms126×1valid
15.0ms130×0valid
Compiler

Compiled 412 to 366 computations (11.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 29.0ms
ival-cos: 13.0ms (45.4% of total)
ival-sin: 6.0ms (20.9% of total)
adjust: 3.0ms (10.5% of total)
ival-add: 2.0ms (7% of total)
ival-div: 2.0ms (7% of total)
ival-mult: 2.0ms (7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch30.0ms (0.5%)

Memory
39.6MiB live, 39.6MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
18.0ms
0.05943379232780453
42.096490249824654
9.0ms
-2.335155837427654e-7
-1.4586388809818817e-7
Samples
11.0ms78×1valid
8.0ms114×0valid
Compiler

Compiled 396 to 338 computations (14.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-cos: 4.0ms (29.2% of total)
ival-sin: 3.0ms (21.9% of total)
ival-add: 2.0ms (14.6% of total)
adjust: 2.0ms (14.6% of total)
ival-div: 2.0ms (14.6% of total)
ival-mult: 1.0ms (7.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch38.0ms (0.6%)

Memory
-56.4MiB live, 51.3MiB allocated; 23ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
0.05943379232780453
42.096490249824654
23.0ms
-1.4586388809818817e-7
-2.467592391315886e-13
Samples
9.0ms86×0valid
8.0ms58×1valid
Compiler

Compiled 437 to 388 computations (11.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-div: 5.0ms (37.4% of total)
ival-cos: 3.0ms (22.4% of total)
adjust: 2.0ms (14.9% of total)
ival-sin: 2.0ms (14.9% of total)
ival-add: 1.0ms (7.5% of total)
ival-mult: 1.0ms (7.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
0.05943379232780453
42.096490249824654
1.0ms
-1.4586388809818817e-7
-2.467592391315886e-13
Compiler

Compiled 522 to 439 computations (15.9% saved)

simplify32.0ms (0.5%)

Memory
39.6MiB live, 39.6MiB allocated; 0ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069235
1100235
2129235
3170235
4236235
5686235
67917235
Stop Event
1×node limit
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 a #s(literal -105 binary64)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a))) (if (<=.f64 a #s(literal 7201608886376209/2361183241434822606848 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))))
(if (<=.f64 b #s(literal -8689154328480147/37778931862957161709568 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)) (/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (<=.f64 b #s(literal -1369486280032197/9444732965739290427392 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)) (/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (<=.f64 b #s(literal -1369486280032197/9444732965739290427392 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 1080863910568919/18014398509481984 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 r (tan.f64 b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 a #s(literal -105 binary64)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a))) (if (<=.f64 a #s(literal 7201608886376209/2361183241434822606848 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))))
(if (or (<=.f64 a #s(literal -105 binary64)) (not (<=.f64 a #s(literal 7201608886376209/2361183241434822606848 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))))
(if (<=.f64 b #s(literal -8689154328480147/37778931862957161709568 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)) (/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -8689154328480147/37778931862957161709568 binary64)) (not (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r #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 -1369486280032197/9444732965739290427392 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)) (/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -1369486280032197/9444732965739290427392 binary64)) (not (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -1369486280032197/9444732965739290427392 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 1080863910568919/18014398509481984 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 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -1369486280032197/9444732965739290427392 binary64)) (not (<=.f64 b #s(literal 1080863910568919/18014398509481984 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))

derivations237.0ms (4%)

Memory
1.9MiB live, 188.2MiB allocated; 19ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 235 to 70 computations (70.2% saved)

preprocess64.0ms (1.1%)

Memory
-5.2MiB live, 125.8MiB allocated; 25ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 520 to 180 computations (65.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...