rsin A (should all be same)

Time bar (total: 5.4s)

start0.0ms (0%)

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

analyze298.0ms (5.5%)

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

Compiled 11 to 10 computations (9.1% saved)

sample2.0s (37.6%)

Memory
7.0MiB live, 1 897.6MiB allocated; 1.2s collecting garbage
Samples
1.2s6 011×1valid
179.0ms2 245×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-cos: 304.0ms (28.7% of total)
ival-sin: 254.0ms (24% of total)
ival-add: 173.0ms (16.3% of total)
adjust: 162.0ms (15.3% of total)
ival-mult: 84.0ms (7.9% of total)
ival-div: 81.0ms (7.6% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

explain167.0ms (3.1%)

Memory
-4.9MiB live, 144.9MiB allocated; 17ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
69131(-8.069658379581427e+211 -1.3709188532745371e+240 4.159059379396188e-28)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))sensitivity2001
Confusion
Predicted +Predicted -
+690
-13156
Precision
0.345
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6900
-131155
Precision?
0.34328358208955223
Recall?
1.0
Freqs
test
numberfreq
056
1200
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
102.0ms396×1valid
8.0ms116×0valid
Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 82.0ms
ival-cos: 47.0ms (57.3% of total)
ival-sin: 12.0ms (14.6% of total)
adjust: 10.0ms (12.2% of total)
ival-add: 5.0ms (6.1% of total)
ival-div: 4.0ms (4.9% of total)
ival-mult: 3.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess211.0ms (3.9%)

Memory
-43.7MiB live, 149.0MiB allocated; 41ms 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
iter limit
node limit
iter limit
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
1.9MiB live, 1.9MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Compiler

Compiled 9 to 8 computations (11.1% saved)

series17.0ms (0.3%)

Memory
36.1MiB live, 36.0MiB allocated; 0ms 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
3.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
r
@0
((/ (* 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
@-inf
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)

rewrite282.0ms (5.3%)

Memory
-13.6MiB live, 264.4MiB allocated; 42ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0228937
0235901
11325845
08049811
Stop Event
iter limit
node limit
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))))

eval10.0ms (0.2%)

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

Compiled 1 566 to 357 computations (77.2% saved)

prune24.0ms (0.4%)

Memory
-27.4MiB live, 33.1MiB allocated; 7ms collecting garbage
Pruning

21 alts after pruning (20 fresh and 1 done)

PrunedKeptTotal
New592079
Fresh000
Picked011
Done000
Total592180
Accuracy
99.7%
Counts
80 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
44.5%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
76.6%
(/.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.3%
(/.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.2%
(/.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) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
36.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
35.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
60.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
59.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
51.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
56.6%
(/.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))))
57.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
42.9%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 (+.f64 a b)))
48.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
47.9%
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
76.8%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
57.4%
#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))))
59.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
48.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 755 to 506 computations (33% saved)

series99.0ms (1.8%)

Memory
-1.5MiB live, 89.3MiB allocated; 9ms collecting garbage
Counts
32 → 142
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) a)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
#s(literal 1 binary64)
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(cos.f64 (+.f64 a b))
(+.f64 a b)
Outputs
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (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 (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* r (sin 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 (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 (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (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 (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (* 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 (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* 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 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b r)))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (sin b) #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 (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
Calls

9 calls:

TimeVariablePointExpression
48.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))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b))
21.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))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b))
6.0ms
a
@-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))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b))
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))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b))
4.0ms
r
@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))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (+ (/ b a) 1) (/ b a) 1 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (* r (/ 1 (pow (sin b) -1))) (/ 1 (pow (sin b) -1)) (pow (sin b) -1) -1 (cos (+ a b)) (+ a b))

rewrite221.0ms (4.1%)

Memory
-10.1MiB live, 287.3MiB allocated; 110ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05313565
05723150
129283043
080352904
Stop Event
iter limit
node limit
iter limit
Counts
174 → 379
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) a)))
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
#s(literal 1 binary64)
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(cos.f64 (+.f64 a b))
(+.f64 a b)
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (* r (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 (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* r (sin 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 (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 (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (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 (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (* 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 (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* 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 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b r)))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (sin b) #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 (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
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 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(/.f64 (neg.f64 (*.f64 r #s(literal 1 binary64))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
r
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (neg.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)))) (neg.f64 (cos.f64 (-.f64 b a))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) (-.f64 (cos.f64 (-.f64 b a)) (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 b a)))
(/.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (cos.f64 (-.f64 b a))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (cos.f64 (-.f64 b a))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (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 (neg.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (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 b a))) #s(literal 2 binary64))
(+.f64 (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 b a)) #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 (neg.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (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 (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.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 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (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) a))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) a)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) a)))
(fma.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) a))))
(cos.f64 (neg.f64 #s(approx (+ a b) a)))
(cos.f64 #s(approx (+ a b) a))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) a)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(fma.f64 (sin.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(cos.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(*.f64 a (+.f64 (/.f64 b a) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) a (*.f64 (/.f64 b a) a))
(fma.f64 a #s(literal 1 binary64) (*.f64 a (/.f64 b a)))
(+.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 b a) a))
(+.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 a (/.f64 b a)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 b a) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 b a))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 b a) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 b a)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 b a) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (/.f64 b a)))))
(/.f64 (fma.f64 (neg.f64 b) #s(literal 2 binary64) (*.f64 (neg.f64 a) #s(literal 2 binary64))) (*.f64 (neg.f64 a) #s(literal 2 binary64)))
(/.f64 (fma.f64 b #s(literal 2 binary64) (*.f64 a #s(literal 2 binary64))) (*.f64 a #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 a) (*.f64 #s(literal 2 binary64) (neg.f64 b))) (*.f64 #s(literal 2 binary64) (neg.f64 a)))
(/.f64 (fma.f64 #s(literal 2 binary64) a (*.f64 #s(literal 2 binary64) b)) (*.f64 #s(literal 2 binary64) a))
(/.f64 (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 b a) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 b a) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 b a)))
(/.f64 (+.f64 (pow.f64 (/.f64 b a) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 b a))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 b a) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (/.f64 b a))))
(fma.f64 (/.f64 #s(literal -1 binary64) a) (/.f64 b #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 b #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) a) #s(literal 1 binary64))
(fma.f64 (/.f64 b a) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 b a) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 (/.f64 b a) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 b a) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 b a))) (/.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 b a))))
(+.f64 (/.f64 (pow.f64 (/.f64 b a) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 b a)))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 b a)))))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (/.f64 b a)))) (/.f64 (pow.f64 (/.f64 b a) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (/.f64 b a)))))
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 b a))
(*.f64 (/.f64 #s(literal -1 binary64) a) (/.f64 b #s(literal -1 binary64)))
(*.f64 (/.f64 b #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) a))
(*.f64 (/.f64 b a) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 b a))
(/.f64 (*.f64 (neg.f64 b) #s(literal 2 binary64)) (*.f64 (neg.f64 a) #s(literal 2 binary64)))
(/.f64 (*.f64 b #s(literal 2 binary64)) (*.f64 a #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 b)) (*.f64 #s(literal 2 binary64) (neg.f64 a)))
(/.f64 (*.f64 #s(literal 2 binary64) b) (*.f64 #s(literal 2 binary64) a))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
#s(literal 1 binary64)
(*.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 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(/.f64 (neg.f64 (*.f64 r #s(literal 1 binary64))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 b))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
#s(literal -1 binary64)
(/.f64 (neg.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)))) (neg.f64 (cos.f64 (-.f64 b a))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) (-.f64 (cos.f64 (-.f64 b a)) (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 b a)))
(/.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 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (cos.f64 (-.f64 b a))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (cos.f64 (-.f64 b a))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (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 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (neg.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64)))) (neg.f64 (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b))))
(-.f64 (/.f64 (*.f64 a a) (-.f64 a b)) (/.f64 (*.f64 b b) (-.f64 a b)))
(+.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))) (/.f64 (pow.f64 b #s(literal 3 binary64)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 a b)))))
(+.f64 a b)
(+.f64 b a)
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (sin.f64 b) r))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (tan.f64 b) r) (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 (tan.f64 b) r) (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 (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 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 a a)) (sin.f64 b) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) (sin.f64 b) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 a a)) (sin.f64 b) (*.f64 #s(literal 1/120 binary64) (sin.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (tan.f64 b) r) (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 (tan.f64 b) r) (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 (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 #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 (* (+ (/ b a) 1) a) b)
#s(approx (* (+ (/ b a) 1) a) (+.f64 a b))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (*.f64 r (pow.f64 (tan.f64 b) #s(literal 3 binary64)))))) (neg.f64 (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (tan.f64 b) r) (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 (tan.f64 b) r) (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 (tan.f64 b) r)))
#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 (* (+ (/ b a) 1) a) a)
#s(approx (* (+ (/ b a) 1) a) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 (/.f64 b a) #s(literal 1 binary64)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (* (+ (/ b a) 1) a) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (*.f64 b r))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.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 (/ 1 (pow (sin b) -1))) (*.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 (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.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 (/ 1 (pow (sin b) -1)) (*.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 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (*.f64 b r))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (/ 1 (pow (sin b) -1))) (*.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 (/ 1 (pow (sin b) -1))) (*.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 (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.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 (/ 1 (pow (sin b) -1)) (*.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 (pow (sin b) -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 b b) #s(literal 7/360 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (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 (* (+ (/ b a) 1) a) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (+ (/ b a) 1) (fma.f64 (pow.f64 a #s(literal -1 binary64)) b #s(literal 1 binary64)))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (pow (sin b) -1) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (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))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))

eval69.0ms (1.3%)

Memory
8.3MiB live, 101.9MiB allocated; 11ms collecting garbage
Compiler

Compiled 9 447 to 1 602 computations (83% saved)

prune69.0ms (1.3%)

Memory
5.5MiB live, 100.7MiB allocated; 14ms collecting garbage
Pruning

47 alts after pruning (43 fresh and 4 done)

PrunedKeptTotal
New38736423
Fresh8715
Picked235
Done011
Total39747444
Accuracy
99.8%
Counts
444 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.2%
(/.f64 (/.f64 (*.f64 r #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))))
60.1%
(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
36.0%
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
42.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
44.5%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
76.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (cos.f64 (+.f64 a b)))
48.6%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
44.5%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
76.6%
(/.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))))))
51.2%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.2%
(/.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.2%
(/.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)))))
35.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.2%
(/.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.4%
(/.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))))
61.5%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
73.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))))
56.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
66.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
60.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
52.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
36.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
35.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
34.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
35.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
43.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
59.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
51.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
57.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
28.7%
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
47.8%
(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
48.3%
(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (cos.f64 #s(approx (+ a b) a)))
48.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
51.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
57.4%
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
48.3%
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
32.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)))))))
59.5%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 b))))
33.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
33.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
59.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
31.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
Compiler

Compiled 1 814 to 1 318 computations (27.3% saved)

series118.0ms (2.2%)

Memory
22.5MiB live, 258.1MiB allocated; 26ms collecting garbage
Counts
38 → 181
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)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
(cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b)))
#s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))
#s(approx (* (+ (/ b a) 1) a) b)
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
(*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64))
(log.f64 (sin.f64 b))
#s(literal 1 binary64)
(cos.f64 #s(approx (+ a b) a))
#s(approx (+ a b) a)
(/.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))))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 a b))
(+.f64 a b)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 a b))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
Outputs
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (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 (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (exp (* (log (sin b)) 1))) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI))))))))
#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 (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (/ (* a (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (sin b) (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (+ (* -1 (/ (* (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))) (/ (* r (* (sin b) (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))))) (+ (* -1 (/ (* r (* (sin b) (pow (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))) 2))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 3))) (/ (* r (* (sin b) (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b)))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2))))) (/ (* r (* (sin b) (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI))))))) (pow (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))) 2)))) (/ (* r (sin b)) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* (cos b) (cos (* 1/2 (PI)))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin b))))) (* (cos b) (cos (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (+ (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin b))) (* a (+ (* -1/6 (* (cos b) (cos (* 1/2 (PI))))) (* 1/6 (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (cos (* 1/2 (PI))))))) (+ (* (cos b) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin b))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin b)))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (cos b)))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* -1/2 (* a (sin b))))))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin b) (* a (+ (cos b) (* a (+ (* -1/2 (sin b)) (* -1/6 (* a (cos b))))))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos b) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* a (* (sin b) (sin (* 1/2 (PI)))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* -1/2 (* a (* (cos b) (sin (* 1/2 (PI)))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* a (+ (* -1 (* (sin b) (sin (* 1/2 (PI))))) (* a (+ (* -1/2 (* (cos b) (sin (* 1/2 (PI))))) (* 1/6 (* a (* (sin b) (sin (* 1/2 (PI)))))))))) (* (cos b) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (cos 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 (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ a b))) (* (cos (+ a b)) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (+ a b))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ a b)) (sin (* 1/2 (PI))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- b (* -1 a)))) (* (cos (- b (* -1 a))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (- b (* -1 a)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- b (* -1 a))) (sin (* 1/2 (PI))))))
#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 (cos (+ a b)) #s(hole binary64 (cos a)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (exp (* (log (sin b)) 1))) #s(hole binary64 (* b r)))
#s(approx (* r (exp (* (log (sin b)) 1))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (exp (* (log (sin b)) 1))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (exp (* (log (sin b)) 1))) #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 (exp (* (log (sin b)) 1)) #s(hole binary64 b))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (log b)))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (log b)))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* -1/6 (pow b 2)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* -1/180 (pow b 2)) 1/6)))))
#s(approx (log (sin b)) #s(hole binary64 (+ (log b) (* (pow b 2) (- (* (pow b 2) (- (* -1/2835 (pow b 2)) 1/180)) 1/6)))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* b r) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* -1 (/ (* b (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* r (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (+ (/ (* r (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI))))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)) (/ (* (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) (- (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))))) (* -1/6 (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))) (+ (* -1 (/ (* r (pow (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI))))) 2)) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 3))) (/ (* r (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2))))) (/ (* r (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (pow (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))) 2)))) (/ r (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a)))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* (cos a) (cos (* 1/2 (PI)))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* -1/2 (* (cos (* 1/2 (PI))) (sin a))))) (* (cos a) (cos (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (+ (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (sin a))) (* b (+ (* -1/6 (* (cos a) (cos (* 1/2 (PI))))) (* 1/6 (* (sin a) (sin (* 1/2 (PI)))))))))) (* (cos a) (cos (* 1/2 (PI))))))) (+ (* (cos a) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin a))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin a)))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (cos a)))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (+ (cos a) (* -1/2 (* b (sin a))))))))
#s(approx (sin (+ a b)) #s(hole binary64 (+ (sin a) (* b (+ (cos a) (* b (+ (* -1/2 (sin a)) (* -1/6 (* b (cos a))))))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos a) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* b (* (sin a) (sin (* 1/2 (PI)))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* -1/2 (* b (* (cos a) (sin (* 1/2 (PI)))))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (+ (* b (+ (* -1 (* (sin a) (sin (* 1/2 (PI))))) (* b (+ (* -1/2 (* (cos a) (sin (* 1/2 (PI))))) (* 1/6 (* b (* (sin a) (sin (* 1/2 (PI)))))))))) (* (cos a) (sin (* 1/2 (PI)))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (exp (* (log (sin b)) 1)) #s(hole binary64 (sin b)))
#s(approx (* (log (sin b)) 1) #s(hole binary64 (log (sin b))))
#s(approx (log (sin b)) #s(hole binary64 (log (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* r (sin b)) (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (- a (* -1 b)))) (* (cos (- a (* -1 b))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ a b)) #s(hole binary64 (sin (- a (* -1 b)))))
#s(approx (* (cos (+ a b)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (- a (* -1 b))) (sin (* 1/2 (PI))))))
Calls

9 calls:

TimeVariablePointExpression
40.0ms
b
@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)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) (* r (exp (* (log (sin b)) 1))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
20.0ms
b
@-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)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) (* r (exp (* (log (sin b)) 1))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
14.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)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) (* r (exp (* (log (sin b)) 1))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
9.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)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) (* r (exp (* (log (sin b)) 1))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))
7.0ms
b
@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)) (cos (+ a b))) (cos (+ a b)) (+ a b) (* (+ (/ b a) 1) a) (/ (* r (exp (* (log (sin b)) 1))) (cos (+ a b))) (* r (exp (* (log (sin b)) 1))) (exp (* (log (sin b)) 1)) (* (log (sin b)) 1) (log (sin b)) 1 (cos (+ a b)) (+ a b) (/ (* r (sin b)) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2))))) (+ (* (sin (+ a b)) (cos (/ (PI) 2))) (* (cos (+ a b)) (sin (/ (PI) 2)))) (sin (+ a b)) (+ a b) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (+ a b)) (sin (/ (PI) 2))) (cos (+ a b)) (sin (/ (PI) 2)))

rewrite239.0ms (4.4%)

Memory
17.5MiB live, 286.0MiB allocated; 37ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval66.0ms (1.2%)

Memory
-29.0MiB live, 127.0MiB allocated; 47ms collecting garbage
Compiler

Compiled 10 371 to 1 516 computations (85.4% saved)

prune54.0ms (1%)

Memory
-16.2MiB live, 129.3MiB allocated; 13ms collecting garbage
Pruning

54 alts after pruning (47 fresh and 7 done)

PrunedKeptTotal
New37021391
Fresh122638
Picked235
Done044
Total38454438
Accuracy
99.9%
Counts
438 → 54
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.2%
(/.f64 (/.f64 (*.f64 r #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))))
60.1%
(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
36.0%
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
42.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
44.5%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
99.3%
(/.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))))
76.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (cos.f64 (+.f64 a b)))
48.6%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
44.5%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
76.6%
(/.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)) #s(literal 1 binary64))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
99.4%
(/.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))))
61.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
73.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.1%
(/.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))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (sin.f64 (+.f64 b (PI.f64))) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
66.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
99.2%
(/.f64 (*.f64 r (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 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (+.f64 a b)) #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 a b)) #s(literal 3 binary64)) #s(literal 1 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
99.2%
(/.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.2%
(/.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)))))
35.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.2%
(/.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.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
60.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
52.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
35.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
35.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
34.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
43.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
59.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
51.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
57.3%
(/.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))))
36.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 a b)))))
35.9%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
35.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
28.7%
(/.f64 (*.f64 r (exp.f64 (log.f64 (sin.f64 b)))) (cos.f64 #s(approx (+ a b) a)))
48.3%
(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (cos.f64 #s(approx (+ a b) a)))
48.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
31.2%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
59.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b)))))
51.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
57.4%
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
48.3%
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
31.9%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
32.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)))))))
33.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))))
33.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
59.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
31.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
Compiler

Compiled 2 207 to 1 574 computations (28.7% saved)

series47.0ms (0.9%)

Memory
2.1MiB live, 94.7MiB allocated; 5ms collecting garbage
Counts
41 → 225
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))
(neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r (tan.f64 (+.f64 b (PI.f64))))
(tan.f64 (+.f64 b (PI.f64)))
(+.f64 b (PI.f64))
(PI.f64)
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) b)
#s(literal 1/2 binary64)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
Outputs
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (PI)))) #s(hole binary64 (/ (* r (sin (+ b (PI)))) (cos (+ b (PI))))))
#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)) (- (* (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* r (sin b))))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (* r (sqrt (sin b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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)) (+ (* (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 (/ (* 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 (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#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 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 (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) #s(hole binary64 (* -1 b)))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* 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 (PI)))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (+ (* b (* r (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (+ (* b (+ (* r (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (* b (* r (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))) (cos (PI))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (* b (* r (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))))) (/ (* r (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI))))) (* r (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#s(approx (/ (* 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 (+ (* (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 (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (+ b (* 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 (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* b r)))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #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 (/ r (pow (sin b) -1/2)) #s(hole binary64 (* (sqrt b) r)))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (+ (* -1/12 (* (sqrt (pow b 5)) r)) (* (sqrt b) r))))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (+ (* (sqrt b) r) (* (pow b 3) (+ (* -1/12 (* (sqrt (/ 1 b)) r)) (* 1/240 (* (sqrt (pow b 3)) r)))))))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (+ (* (sqrt b) r) (* (pow b 3) (+ (* -1/12 (* (sqrt (/ 1 b)) r)) (* (pow b 2) (+ (* -1/288 (* (sqrt (/ 1 b)) r)) (* 1/240 (* (sqrt (/ 1 b)) r)))))))))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (sqrt (/ 1 b))))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (/ (+ (sqrt b) (* 1/12 (sqrt (pow b 5)))) b)))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (/ (+ (sqrt b) (* (pow b 3) (+ (* 7/720 (sqrt (pow b 3))) (* 1/12 (sqrt (/ 1 b)))))) b)))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (/ (+ (sqrt b) (* (pow b 3) (+ (* 1/12 (sqrt (/ 1 b))) (* (pow b 2) (+ (* -1/288 (sqrt (/ 1 b))) (* 7/720 (sqrt (/ 1 b)))))))) b)))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (sqrt b)))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (+ (sqrt b) (* -1/12 (sqrt (pow b 5))))))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (+ (sqrt b) (* (pow b 3) (+ (* -1/12 (sqrt (/ 1 b))) (* 1/240 (sqrt (pow b 3))))))))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (+ (sqrt b) (* (pow b 3) (+ (* -1/12 (sqrt (/ 1 b))) (* (pow b 2) (+ (* -1/288 (sqrt (/ 1 b))) (* 1/240 (sqrt (/ 1 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 (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* -1 (sin b))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (+ b (PI))) (cos (+ b (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) b)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 b))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (sqrt (/ 1 (sin b)))))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (sqrt (sin b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (/ (* r (sin (- (PI) (* -1 b)))) (cos (- (PI) (* -1 b))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (- (PI) (* -1 b))) (cos (- (PI) (* -1 b))))))
#s(approx (+ b (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Calls

9 calls:

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

rewrite186.0ms (3.5%)

Memory
32.3MiB live, 172.7MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08326601
08895884
147815168
082284938
Stop Event
iter limit
node limit
iter limit
Counts
266 → 492
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))
(neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
#s(literal -1 binary64)
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
(*.f64 r (tan.f64 (+.f64 b (PI.f64))))
(tan.f64 (+.f64 b (PI.f64)))
(+.f64 b (PI.f64))
(PI.f64)
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) b)
#s(literal 1/2 binary64)
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (sin.f64 b) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (PI)))) #s(hole binary64 (/ (* r (sin (+ b (PI)))) (cos (+ b (PI))))))
#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)) (- (* (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* r (sin b))))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (* r (sqrt (sin b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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)) (+ (* (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 (/ (* 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 (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 b))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (+ a b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#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 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 (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 a))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (* (+ (/ b a) 1) a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) #s(hole binary64 (* -1 b)))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 b))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow b 2))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* 7/360 (pow b 2))))) b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ (+ 1 (* (pow b 2) (+ 1/6 (* (pow b 2) (+ 7/360 (* 31/15120 (pow b 2))))))) b)))
#s(approx (/ (* 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 (PI)))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (+ (* b (* r (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (+ (* b (+ (* r (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (* b (* r (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))) (cos (PI))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (+ (* b (+ (* b (+ (* -1 (* b (* r (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))))) (/ (* r (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI))))) (* r (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (/ (* b (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* -1 (* b (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 (PI)))
#s(approx (+ b (PI)) #s(hole binary64 (+ b (PI))))
#s(approx (/ (* 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 (+ (* (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 (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (cos (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* -1/2 (* b (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* b (+ (cos (* 1/2 (PI))) (* b (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* b (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (+ b (* 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 (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* b r)))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) #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 (/ r (pow (sin b) -1/2)) #s(hole binary64 (* (sqrt b) r)))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (+ (* -1/12 (* (sqrt (pow b 5)) r)) (* (sqrt b) r))))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (+ (* (sqrt b) r) (* (pow b 3) (+ (* -1/12 (* (sqrt (/ 1 b)) r)) (* 1/240 (* (sqrt (pow b 3)) r)))))))
#s(approx (/ r (pow (sin b) -1/2)) #s(hole binary64 (+ (* (sqrt b) r) (* (pow b 3) (+ (* -1/12 (* (sqrt (/ 1 b)) r)) (* (pow b 2) (+ (* -1/288 (* (sqrt (/ 1 b)) r)) (* 1/240 (* (sqrt (/ 1 b)) r)))))))))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (sqrt (/ 1 b))))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (/ (+ (sqrt b) (* 1/12 (sqrt (pow b 5)))) b)))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (/ (+ (sqrt b) (* (pow b 3) (+ (* 7/720 (sqrt (pow b 3))) (* 1/12 (sqrt (/ 1 b)))))) b)))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (/ (+ (sqrt b) (* (pow b 3) (+ (* 1/12 (sqrt (/ 1 b))) (* (pow b 2) (+ (* -1/288 (sqrt (/ 1 b))) (* 7/720 (sqrt (/ 1 b)))))))) b)))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (sqrt b)))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (+ (sqrt b) (* -1/12 (sqrt (pow b 5))))))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (+ (sqrt b) (* (pow b 3) (+ (* -1/12 (sqrt (/ 1 b))) (* 1/240 (sqrt (pow b 3))))))))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (+ (sqrt b) (* (pow b 3) (+ (* -1/12 (sqrt (/ 1 b))) (* (pow b 2) (+ (* -1/288 (sqrt (/ 1 b))) (* 1/240 (sqrt (/ 1 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 (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (/ 1 (pow (sin b) -1))) #s(hole binary64 (* -1 (sin b))))
#s(approx (/ 1 (pow (sin b) -1)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) -1) #s(hole binary64 (/ 1 (sin b))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (+ b (PI))) (cos (+ b (PI))))))
#s(approx (+ b (PI)) #s(hole binary64 b))
#s(approx (+ b (PI)) #s(hole binary64 (* b (+ 1 (/ (PI) b)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (sin (+ b (* 1/2 (PI))))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 b))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (* b (+ 1 (* 1/2 (/ (PI) b))))))
#s(approx (pow (sin b) -1/2) #s(hole binary64 (sqrt (/ 1 (sin b)))))
#s(approx (/ 1 (pow (sin b) -1/2)) #s(hole binary64 (sqrt (sin b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ (/ b a) 1) a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (* r (tan (+ b (PI)))) #s(hole binary64 (/ (* r (sin (- (PI) (* -1 b)))) (cos (- (PI) (* -1 b))))))
#s(approx (tan (+ b (PI))) #s(hole binary64 (/ (sin (- (PI) (* -1 b))) (cos (- (PI) (* -1 b))))))
#s(approx (+ b (PI)) #s(hole binary64 (* -1 (* b (- (* -1 (/ (PI) b)) 1)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -1 b)))))
#s(approx (+ (* 1/2 (PI)) b) #s(hole binary64 (* -1 (* b (- (* -1/2 (/ (PI) b)) 1)))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- a (* -1 b)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (* (+ (/ b a) 1) a) #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
(*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))
(*.f64 (sin.f64 b) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (-.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
b
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 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 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 a) (cos.f64 b)) #s(literal 2 binary64))) (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.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 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))
(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 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a 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 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 b) #s(literal 1 binary64))
(pow.f64 (pow.f64 (cos.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (cos.f64 b) #s(literal 1 binary64))
(/.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)))))
(*.f64 (cos.f64 a) #s(literal 1 binary64))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (cos.f64 a) #s(literal 1 binary64))
(/.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 (neg.f64 (sin.f64 a)) (sin.f64 b))
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(*.f64 (sin.f64 a) (neg.f64 (sin.f64 b)))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (+.f64 (sin.f64 (-.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 a b)) (cos.f64 (fma.f64 #s(literal -1 binary64) b a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) b) a)) (cos.f64 (+.f64 (+.f64 (PI.f64) b) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a (+.f64 (PI.f64) b))) (cos.f64 (+.f64 a (+.f64 (PI.f64) b)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(pow.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 b (neg.f64 (PI.f64)))) (sin.f64 (+.f64 b (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 b (PI.f64))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 b (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(neg.f64 (sin.f64 b))
(fma.f64 #s(literal 0 binary64) (cos.f64 b) (neg.f64 (sin.f64 b)))
(fma.f64 (sin.f64 b) #s(literal -1 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (neg.f64 b))
(sin.f64 (+.f64 (PI.f64) b))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 b)) (*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b))))
(cos.f64 (neg.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 b)) (neg.f64 (sin.f64 b)))
(+.f64 (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))
(*.f64 (sin.f64 b) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 (sin.f64 b) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(exp.f64 (-.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 b))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (sin.f64 b) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b)))
(/.f64 #s(literal 1 binary64) (sin.f64 b))
(exp.f64 (fma.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))))
#s(literal -1 binary64)
(*.f64 (sin.f64 a) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 a) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.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 (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 b)) r)) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (neg.f64 (sin.f64 b)) r) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) #s(literal 0 binary64))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 b)
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (neg.f64 b) #s(literal 2 binary64))) (+.f64 (PI.f64) (neg.f64 b)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (-.f64 b (PI.f64)))
(/.f64 (-.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (fma.f64 (PI.f64) (PI.f64) (fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (PI.f64) (neg.f64 b)))))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 b (PI.f64)))))
(-.f64 (PI.f64) (neg.f64 b))
(+.f64 (PI.f64) b)
(+.f64 b (PI.f64))
(PI.f64)
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 #s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
(/.f64 (*.f64 (sin.f64 b) r) #s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 b) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 b)))
(fma.f64 (sin.f64 b) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))
(-.f64 (*.f64 (sin.f64 b) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 b)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 b))))
(+.f64 (*.f64 (sin.f64 b) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 b) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 b)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (neg.f64 b) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 b)))
(/.f64 (-.f64 (*.f64 b b) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 b (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 b b)) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 b)))))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 b (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) b)
(fma.f64 #s(literal 1/2 binary64) (PI.f64) b)
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 b))
(-.f64 b (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)
(+.f64 b (*.f64 (PI.f64) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (+.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) #s(approx (* (cos b) (cos a)) (cos.f64 a)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 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))
(*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) r) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (neg.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(/.f64 (/.f64 (*.f64 #s(literal 1 binary64) r) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(*.f64 (sqrt.f64 (sin.f64 b)) (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (sqrt.f64 (sin.f64 b)))
(/.f64 (*.f64 (sqrt.f64 (sin.f64 b)) r) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) r) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(/.f64 (neg.f64 r) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/4 binary64)) (pow.f64 (sin.f64 b) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 b))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/4 binary64))
(pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 b) #s(literal -1/2 binary64))
(/.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (sin.f64 b)))
(sqrt.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 b) #s(literal 1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
(sqrt.f64 (sin.f64 b))
(exp.f64 (-.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))))
(cos.f64 (neg.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
(*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a)
(*.f64 a (+.f64 (/.f64 b a) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) a (*.f64 (/.f64 b a) a))
(+.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 b a) a))
(+.f64 a (*.f64 a (/.f64 b a)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 b a) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 b a)))
(/.f64 (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 b a) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 b a) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 b a)))))
(/.f64 (+.f64 (pow.f64 (/.f64 b a) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 b a) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 b a) #s(literal 1 binary64)))))
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 b a))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (tan (+ b (PI)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (*.f64 (sin.f64 b) r))
#s(approx (/ r (pow (sin b) -1/2)) (*.f64 (sqrt.f64 (sin.f64 b)) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a (neg.f64 (sin.f64 b))) a (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx a a)
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (sin a)) (*.f64 (neg.f64 a) (sin.f64 b)))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (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)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 #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 (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (*.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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (*.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)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (* (+ (/ b a) 1) a) b)
#s(approx (* (+ (/ b a) 1) a) (+.f64 a b))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 a b) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (* (+ (/ b a) 1) a) a)
#s(approx (* (+ (/ b a) 1) a) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 (/.f64 b a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.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 (/ 1 (pow (sin b) -1)) (*.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 (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a)) (*.f64 (neg.f64 b) (sin.f64 a)))
#s(approx (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (neg.f64 b))
#s(approx (neg (/ 1 (pow (sin b) -1))) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b))
#s(approx (neg (/ 1 (pow (sin b) -1))) (*.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 (/ 1 (pow (sin b) -1))) (*.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 (/ 1 (pow (sin b) -1)) b)
#s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (/ 1 (pow (sin b) -1)) (*.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 (/ 1 (pow (sin b) -1)) (*.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 (pow (sin b) -1) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 b b) #s(literal 7/360 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 (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (PI)))) (*.f64 #s(literal 0 binary64) r))
#s(approx (* r (tan (+ b (PI)))) (fma.f64 (*.f64 #s(literal 1 binary64) r) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (tan (+ b (PI)))) (fma.f64 (fma.f64 (*.f64 #s(literal 0 binary64) r) b (*.f64 #s(literal 1 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (tan (+ b (PI)))) (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (*.f64 #s(literal -1/3 binary64) r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 1 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (tan (+ b (PI))) #s(literal 0 binary64))
#s(approx (tan (+ b (PI))) (+.f64 #s(literal 0 binary64) b))
#s(approx (tan (+ b (PI))) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (tan (+ b (PI))) (fma.f64 (-.f64 (fma.f64 (fma.f64 (neg.f64 b) #s(literal -1/3 binary64) #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (+ b (PI)) (PI.f64))
#s(approx (+ b (PI)) (+.f64 (PI.f64) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (sin (+ (* 1/2 (PI)) b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(approx (sin (+ (* 1/2 (PI)) b)) (fma.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) b (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) b (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* 1/2 (PI)) b)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) b) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) b (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) b (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/2 (PI)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
#s(approx (+ (* 1/2 (PI)) b) (fma.f64 (PI.f64) #s(literal 1/2 binary64) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (*.f64 b r))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (*.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 (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (*.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 (/ r (pow (sin b) -1/2)) (*.f64 (sqrt.f64 b) r))
#s(approx (/ r (pow (sin b) -1/2)) (fma.f64 (*.f64 (pow.f64 b #s(literal 5/2 binary64)) r) #s(literal -1/12 binary64) (*.f64 (sqrt.f64 b) r)))
#s(approx (/ r (pow (sin b) -1/2)) (fma.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 3/2 binary64)) r) #s(literal 1/240 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal -1/2 binary64)) r) #s(literal -1/12 binary64))) (pow.f64 b #s(literal 3 binary64)) (*.f64 (sqrt.f64 b) r)))
#s(approx (/ r (pow (sin b) -1/2)) (fma.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal -1/2 binary64)) #s(literal -1/12 binary64)) r (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal -1/2 binary64)) r) #s(literal 1/1440 binary64)) (*.f64 b b))) (pow.f64 b #s(literal 3 binary64)) (*.f64 (sqrt.f64 b) r)))
#s(approx (pow (sin b) -1/2) (pow.f64 b #s(literal -1/2 binary64)))
#s(approx (pow (sin b) -1/2) (/.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 b #s(literal 5/2 binary64)) (sqrt.f64 b)) b))
#s(approx (pow (sin b) -1/2) (/.f64 (fma.f64 (fma.f64 #s(literal 7/720 binary64) (pow.f64 b #s(literal 3/2 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 b #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 b)) b))
#s(approx (pow (sin b) -1/2) (/.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal -1/2 binary64)) #s(literal 1/160 binary64)) (*.f64 b b) (*.f64 #s(literal 1/12 binary64) (pow.f64 b #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 b)) b))
#s(approx (/ 1 (pow (sin b) -1/2)) (sqrt.f64 b))
#s(approx (/ 1 (pow (sin b) -1/2)) (fma.f64 (pow.f64 b #s(literal 5/2 binary64)) #s(literal -1/12 binary64) (sqrt.f64 b)))
#s(approx (/ 1 (pow (sin b) -1/2)) (fma.f64 (fma.f64 (pow.f64 b #s(literal 3/2 binary64)) #s(literal 1/240 binary64) (*.f64 (pow.f64 b #s(literal -1/2 binary64)) #s(literal -1/12 binary64))) (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 b)))
#s(approx (/ 1 (pow (sin b) -1/2)) (fma.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal -1/2 binary64)) #s(literal 1/1440 binary64)) (*.f64 b b) (*.f64 (pow.f64 b #s(literal -1/2 binary64)) #s(literal -1/12 binary64))) (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1))) (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 (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (neg (/ 1 (pow (sin b) -1))) (neg.f64 (sin.f64 b)))
#s(approx (/ 1 (pow (sin b) -1)) (sin.f64 b))
#s(approx (pow (sin b) -1) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
#s(approx (tan (+ b (PI))) (tan.f64 b))
#s(approx (+ b (PI)) b)
#s(approx (+ b (PI)) (*.f64 (+.f64 (/.f64 (PI.f64) b) #s(literal 1 binary64)) b))
#s(approx (sin (+ (* 1/2 (PI)) b)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))
#s(approx (+ (* 1/2 (PI)) b) b)
#s(approx (+ (* 1/2 (PI)) b) (*.f64 (fma.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) -1/2) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))
#s(approx (/ 1 (pow (sin b) -1/2)) (sqrt.f64 (sin.f64 b)))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (+ (/ b a) 1) (fma.f64 (pow.f64 a #s(literal -1 binary64)) b #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (tan (+ b (PI)))) (*.f64 (tan.f64 b) r))
#s(approx (tan (+ b (PI))) (tan.f64 b))
#s(approx (+ b (PI)) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (PI.f64) b)) #s(literal 1 binary64))))
#s(approx (sin (+ (* 1/2 (PI)) b)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))
#s(approx (+ (* 1/2 (PI)) b) (*.f64 (neg.f64 b) (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (* (+ (/ b a) 1) a) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval79.0ms (1.5%)

Memory
-9.0MiB live, 134.1MiB allocated; 18ms collecting garbage
Compiler

Compiled 18 066 to 2 412 computations (86.6% saved)

prune112.0ms (2.1%)

Memory
-13.6MiB live, 135.2MiB allocated; 17ms collecting garbage
Pruning

70 alts after pruning (61 fresh and 9 done)

PrunedKeptTotal
New61826644
Fresh73542
Picked325
Done077
Total62870698
Accuracy
99.9%
Counts
698 → 70
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.1%
(/.f64 (/.f64 (*.f64 (sqrt.f64 (sin.f64 b)) r) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
99.2%
(/.f64 (/.f64 (*.f64 r #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))))
60.1%
(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
36.0%
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (sin.f64 b))))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
28.5%
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) #s(approx (/ 1 (pow (sin b) -1/2)) (sqrt.f64 b))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
42.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a b)))
44.5%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
99.3%
(/.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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
99.3%
(/.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))))
35.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
76.8%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (cos.f64 (+.f64 a b)))
48.6%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (cos.f64 (+.f64 a b)))
20.9%
(/.f64 (*.f64 r (*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
76.6%
(/.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)) #s(literal 1 binary64))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
99.4%
(/.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))))
61.5%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
99.1%
(/.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))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (sin.f64 (+.f64 (PI.f64) b)) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (sin.f64 a))))
56.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))))) (sin.f64 a))))
77.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
66.8%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
99.2%
(/.f64 (*.f64 r (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 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (+.f64 a b)) #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 a b)) #s(literal 3 binary64)) #s(literal 1 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
99.2%
(/.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.2%
(/.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)))))
35.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
34.6%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
35.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
37.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
60.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
34.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
35.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
35.4%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
34.7%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
76.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
43.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
59.5%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
51.3%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
57.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
36.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 a b)))))
35.9%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
35.3%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
34.9%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 #s(approx (+ (* 1/2 (PI)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
18.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 #s(approx (+ (* 1/2 (PI)) b) b))))
28.7%
(/.f64 (*.f64 r (exp.f64 (log.f64 (sin.f64 b)))) (cos.f64 #s(approx (+ a b) a)))
48.3%
(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (cos.f64 #s(approx (+ a b) a)))
48.3%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
31.2%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
52.3%
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
59.5%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b)))))
51.3%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
35.9%
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin a))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) b)))))
48.3%
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
57.4%
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
31.9%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
32.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)))))))
18.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (-.f64 b (PI.f64))))))
11.8%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 b (PI.f64))))))))
33.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)) (PI.f64)))))
33.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))))
33.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
6.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 #s(approx (+ b (PI)) (PI.f64)))))
59.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
15.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan (+ b (PI))) #s(literal 0 binary64))))
31.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
Compiler

Compiled 3 828 to 1 628 computations (57.5% saved)

regimes132.0ms (2.5%)

Memory
39.7MiB live, 168.5MiB allocated; 22ms 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))) (*.f64 r #s(approx (tan (+ b (PI))) #s(literal 0 binary64))))
#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 #s(approx (+ b (PI)) (PI.f64)))))
#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 r (tan.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)) (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b))))
(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (cos.f64 #s(approx (+ a b) a)))
(/.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 #s(literal 1/2 binary64) (PI.f64) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (-.f64 b (PI.f64))))))
(/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.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 (/.f64 (sin.f64 b) (cos.f64 b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) a))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) b)))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 #s(approx (+ (* 1/2 (PI)) b) 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)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) 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)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 #s(approx (+ (* 1/2 (PI)) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(*.f64 r (/.f64 (sin.f64 b) #s(approx (+ (* (cos b) (cos a)) (* (neg (/ 1 (pow (sin b) -1))) (sin 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)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 a b)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) a) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) a)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) 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)))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (cos.f64 (+.f64 a 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 (/ 1 (pow (sin b) -1))) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 (tan.f64 b) r)))
(/.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 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)) (* (neg (/ 1 (pow (sin b) -1))) (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)) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 b (PI.f64))))))))
(/.f64 (*.f64 r (*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) b))))
(/.f64 (/.f64 (*.f64 r #s(literal 1 binary64)) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) #s(approx (/ 1 (pow (sin b) -1/2)) (sqrt.f64 b))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (exp.f64 (log.f64 (sin.f64 b)))) (cos.f64 #s(approx (+ a b) a)))
(/.f64 (*.f64 r (exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))) (cos.f64 #s(approx (+ a b) a)))
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 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))))
#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 (*.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)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (+.f64 a 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))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.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)) #s(literal 1 binary64))))
(/.f64 (/.f64 (*.f64 (sqrt.f64 (sin.f64 b)) r) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.f64 (fma.f64 (*.f64 b b) #s(literal 1/6 binary64) #s(literal 1 binary64)) b)))) (sin.f64 a))))
(/.f64 (*.f64 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (sin.f64 b))))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 a b)))
(/.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 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (sin.f64 (+.f64 b (PI.f64))) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (sin.f64 (+.f64 (PI.f64) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 #s(approx (+ a b) a)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) a)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 b)))) (sin.f64 a))))
(/.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 (/.f64 r (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (exp.f64 (*.f64 (log.f64 (cos.f64 a)) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64))) (sin.f64 a))))
(/.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (sin.f64 a))))
(/.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)))) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (/.f64 (*.f64 r #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 (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (exp.f64 (*.f64 (log.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) (exp.f64 (*.f64 (log.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)))) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (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)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1/2 binary64)))) (sin.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)) (-.f64 (*.f64 (fma.f64 (sin.f64 b) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 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 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal -1 binary64)))))) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (+.f64 a b)) #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 a b)) #s(literal 3 binary64)) #s(literal 1 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a 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 (fma.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)) #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
(/.f64 (*.f64 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)))))))
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:

43.0ms
a
33.0ms
r
27.0ms
b
24.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
99.4%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.4%1r
99.4%1a
99.4%1b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes98.0ms (1.8%)

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

32.0ms
b
27.0ms
r
18.0ms
a
17.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
99.4%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
99.4%1r
99.4%1a
99.4%1b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes92.0ms (1.7%)

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

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

regimes102.0ms (1.9%)

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

4 calls:

37.0ms
b
29.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
17.0ms
r
17.0ms
a
Results
AccuracySegmentsBranch
76.8%1b
76.8%1r
76.8%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
76.8%1a
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes55.0ms (1%)

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

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

regimes28.0ms (0.5%)

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

4 calls:

7.0ms
a
7.0ms
b
7.0ms
r
7.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
59.6%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
59.6%1r
76.7%3b
76.0%3a
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes32.0ms (0.6%)

Memory
-36.2MiB live, 10.1MiB allocated; 4ms collecting garbage
Counts
12 → 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))) (*.f64 r #s(approx (tan (+ b (PI))) #s(literal 0 binary64))))
#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 #s(approx (+ b (PI)) (PI.f64)))))
#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 r (tan.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)) (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (/ 1 (pow (sin b) -1))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* (/ r (pow (sin b) -1/2)) (/ 1 (pow (sin b) -1/2))) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) #s(approx (* (+ (/ b a) 1) a) 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:

31.0ms
b
Results
AccuracySegmentsBranch
76.6%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

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

2 calls:

3.0ms
b
3.0ms
a
Results
AccuracySegmentsBranch
59.6%1a
59.6%1b
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes5.0ms (0.1%)

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

Total -10.9b remaining (-24.7%)

Threshold costs -10.9b (-24.7%)

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

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

bsearch53.0ms (1%)

Memory
-11.8MiB live, 89.3MiB allocated; 9ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
22.0ms
9.79549598024922e-19
5.2388484276227705e-14
27.0ms
-171257705925.14386
-1.2732295846471278e-13
Samples
26.0ms166×1valid
11.0ms138×0valid
Compiler

Compiled 601 to 527 computations (12.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-cos: 8.0ms (30.8% of total)
ival-mult: 5.0ms (19.3% of total)
adjust: 4.0ms (15.4% of total)
ival-sin: 4.0ms (15.4% of total)
ival-add: 2.0ms (7.7% of total)
ival-div: 2.0ms (7.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
4.1MiB live, 4.1MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
9.79549598024922e-19
5.2388484276227705e-14
1.0ms
-171257705925.14386
-1.2732295846471278e-13
Compiler

Compiled 582 to 489 computations (16% saved)

simplify43.0ms (0.8%)

Memory
-28.8MiB live, 63.5MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
063188
198184
2141183
3229183
4601183
52211183
Stop Event
node limit
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 (*.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 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.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)) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -8116567392432203/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 8239728901483491/158456325028528675187087900672 binary64)) (/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) 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 -8116567392432203/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 8239728901483491/158456325028528675187087900672 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 (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 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (sin b) -1) (/.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)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (/.f64 #s(literal -1 binary64) #s(approx (pow (sin b) -1) (/.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)) (cos.f64 (+.f64 a b)))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -8116567392432203/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 8239728901483491/158456325028528675187087900672 binary64)) (/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (cos.f64 #s(approx (+ a b) a))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -8116567392432203/147573952589676412928 binary64)) (not (<=.f64 b #s(literal 8239728901483491/158456325028528675187087900672 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r #s(approx (/ 1 (pow (sin b) -1)) b)) (cos.f64 #s(approx (+ a b) a))))
(if (<=.f64 b #s(literal -8116567392432203/147573952589676412928 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 8239728901483491/158456325028528675187087900672 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 -8116567392432203/147573952589676412928 binary64)) (not (<=.f64 b #s(literal 8239728901483491/158456325028528675187087900672 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)))

derivations244.0ms (4.5%)

Memory
28.3MiB live, 220.0MiB allocated; 39ms collecting garbage
Stop Event
fuel
Compiler

Compiled 187 to 64 computations (65.8% saved)

preprocess90.0ms (1.7%)

Memory
-15.0MiB live, 81.9MiB allocated; 11ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 488 to 216 computations (55.7% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...