rsin A (should all be same)

Time bar (total: 5.1s)

start0.0ms (0%)

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

analyze249.0ms (4.8%)

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

Compiled 11 to 10 computations (9.1% saved)

sample2.0s (39.8%)

Memory
55.3MiB live, 1 932.6MiB allocated; 926ms collecting garbage
Samples
1.6s5 978×1valid
158.0ms2 278×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-cos: 392.0ms (36.5% of total)
ival-sin: 303.0ms (28.2% of total)
adjust: 140.0ms (13% of total)
ival-div!: 103.0ms (9.6% of total)
ival-mult!: 88.0ms (8.2% of total)
ival-add!: 49.0ms (4.6% of total)
Bogosity

explain155.0ms (3%)

Memory
-19.4MiB live, 182.6MiB allocated; 48ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
75118(-5.911719214307329e-193 -4.0742287397637215e+172 3.4029077991019094e-183)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))sensitivity1930
Confusion
Predicted +Predicted -
+750
-11863
Precision
0.38860103626943004
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+7500
-118063
Precision?
0.38860103626943004
Recall?
1.0
Freqs
test
numberfreq
063
1193
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
64.0ms374×1valid
9.0ms138×0valid
Compiler

Compiled 63 to 28 computations (55.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 52.0ms
ival-cos: 18.0ms (34.6% of total)
ival-sin: 14.0ms (26.9% of total)
adjust: 7.0ms (13.5% of total)
ival-div!: 6.0ms (11.5% of total)
ival-mult!: 5.0ms (9.6% of total)
ival-add!: 3.0ms (5.8% of total)

preprocess213.0ms (4.1%)

Memory
5.6MiB live, 189.5MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03897
110397
225197
357397
4101397
5204597
6433797
089
0139
1249
2429
3659
4839
51079
62059
77999
852909
082779
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
Symmetry

(negabs r)

Compiler

Compiled 9 to 8 computations (11.1% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

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

Compiled 9 to 8 computations (11.1% saved)

series19.0ms (0.4%)

Memory
1.5MiB live, 47.7MiB allocated; 4ms 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
4.0ms
r
@-inf
((/ (* r (sin b)) (cos (+ a b))) (* r (sin b)) r (sin b) b (cos (+ a b)) (+ a b) a)
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)

rewrite200.0ms (3.9%)

Memory
18.4MiB live, 253.5MiB allocated; 42ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval11.0ms (0.2%)

Memory
-29.1MiB live, 19.1MiB allocated; 3ms collecting garbage
Compiler

Compiled 1 566 to 357 computations (77.2% saved)

prune20.0ms (0.4%)

Memory
-10.2MiB live, 37.2MiB allocated; 1ms collecting garbage
Pruning

26 alts after pruning (25 fresh and 1 done)

PrunedKeptTotal
New542579
Fresh000
Picked011
Done000
Total542680
Accuracy
99.7%
Counts
80 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.1%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 (+.f64 a b)))
▶37.0%
(/.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)))
74.9%
(/.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.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))) (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))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓75.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
57.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
62.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
▶59.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
54.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
56.0%
(/.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))))
49.6%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
50.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
56.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
48.7%
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
48.9%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
49.1%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
75.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
55.0%
#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))))
▶56.5%
#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))))
49.2%
#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))
▶59.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
49.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
Compiler

Compiled 1 081 to 712 computations (34.1% saved)

series44.0ms (0.9%)

Memory
33.9MiB live, 80.7MiB allocated; 2ms collecting garbage
Counts
29 → 150
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b)))
(*.f64 r (*.f64 (tan.f64 b) (tan.f64 b)))
(*.f64 (tan.f64 b) (tan.f64 b))
(/.f64 (*.f64 r (*.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 r (*.f64 (pow.f64 (sin.f64 b) #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)) (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)
(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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* r (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (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) (pow (sin b) 1/2))) #s(hole binary64 (* r (sin b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* -1 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (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) (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) (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 b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* a (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* 1/3 (* b r)) (* a r)))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* a r) (* b (+ (* 1/3 r) (* 2/3 (* a (* b r)))))))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (pow b 2)))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (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) (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) (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) (pow (sin b) 1/2))) #s(hole binary64 (* b r)))
#s(approx (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (* (pow (sin b) 1/2) (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) (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 (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 b))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #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/2) #s(hole binary64 (sqrt b)))
#s(approx (pow (sin b) 1/2) #s(hole binary64 (+ (sqrt b) (* -1/12 (sqrt (pow b 5))))))
#s(approx (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 (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 (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) 1/2) #s(hole binary64 (sqrt (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 (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
Calls

9 calls:

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

rewrite228.0ms (4.4%)

Memory
-23.4MiB live, 205.6MiB allocated; 78ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06104038
06523473
135293324
084093168
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
179 → 394
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (sin.f64 b) (sin.f64 a))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
(*.f64 r (tan.f64 b))
(tan.f64 b)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b)))
(*.f64 r (*.f64 (tan.f64 b) (tan.f64 b)))
(*.f64 (tan.f64 b) (tan.f64 b))
(/.f64 (*.f64 r (*.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 r (*.f64 (pow.f64 (sin.f64 b) #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)) (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)
(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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* r (+ (/ (sin b) (cos b)) (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (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) (pow (sin b) 1/2))) #s(hole binary64 (* r (sin b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* r (+ (* -1 (/ (sin b) (cos b))) (* -1 (/ (* a (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos b)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos b)))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (cos (+ a b)) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (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) (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) (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 b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (+ a b))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* a (+ (/ (* r (sin b)) (* a (cos b))) (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (cos (+ a b)) #s(hole binary64 (cos (- b (* -1 a)))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (* r (sin b)) (* a (cos b)))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b r)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* a (* b r))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* 1/3 (* b r)) (* a r)))))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) #s(hole binary64 (* b (+ r (* b (+ (* a r) (* b (+ (* 1/3 r) (* 2/3 (* a (* b r)))))))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) r)))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* 2/3 (* (pow b 2) r))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 17/45 (* (pow b 2) r)) (* 2/3 r)))))))
#s(approx (* r (* (tan b) (tan b))) #s(hole binary64 (* (pow b 2) (+ r (* (pow b 2) (+ (* 2/3 r) (* (pow b 2) (+ (* 62/315 (* (pow b 2) r)) (* 17/45 r)))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (pow b 2)))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* 2/3 (pow b 2))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* 17/45 (pow b 2))))))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (* (pow b 2) (+ 1 (* (pow b 2) (+ 2/3 (* (pow b 2) (+ 17/45 (* 62/315 (pow b 2))))))))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (* (pow (sin b) 1/2) (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) (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) (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) (pow (sin b) 1/2))) #s(hole binary64 (* b r)))
#s(approx (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (* (pow (sin b) 1/2) (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) (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 (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 b))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #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/2) #s(hole binary64 (sqrt b)))
#s(approx (pow (sin b) 1/2) #s(hole binary64 (+ (sqrt b) (* -1/12 (sqrt (pow b 5))))))
#s(approx (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 (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 (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (tan b) (tan b)) #s(hole binary64 (/ (pow (sin b) 2) (pow (cos b) 2))))
#s(approx (* (pow (sin b) 1/2) (pow (sin b) 1/2)) #s(hole binary64 (sin b)))
#s(approx (pow (sin b) 1/2) #s(hole binary64 (sqrt (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 (/ (* r (* (pow (sin b) 1/2) (pow (sin b) 1/2))) (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 (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 b)))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 b)))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)) (sqrt.f64 (sin.f64 b)))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 b))) (neg.f64 (sqrt.f64 (sin.f64 b))))
(*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))
(pow.f64 (neg.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 b)) #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) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(sqrt.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(fabs.f64 (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 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 1/2 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 a b))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 b))) (cos.f64 (-.f64 a (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) b a)) (cos.f64 (-.f64 (neg.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (pow.f64 (cos.f64 b) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) #s(literal 1/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)))))
(*.f64 (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (cos.f64 a) #s(literal 2 binary64)) #s(literal 1/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 a b)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 a) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(sin.f64 a)
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (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) b))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(fma.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
(+.f64 (*.f64 (sin.f64 #s(approx (+ a b) b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ a b) b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (cos.f64 b) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (sin.f64 b) r)))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a)) (neg.f64 (cos.f64 b)) (*.f64 (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 b) r)))) (*.f64 (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (neg.f64 (cos.f64 b))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a)) (cos.f64 b) (*.f64 (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (sin.f64 b) r))) (*.f64 (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (cos.f64 b)))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (neg.f64 (cos.f64 b)) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 b) r)))) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (neg.f64 (cos.f64 b))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 b)) (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a)))) (*.f64 (neg.f64 (cos.f64 b)) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 b)) (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a))) (*.f64 (neg.f64 (cos.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (sin.f64 b) r) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (*.f64 (cos.f64 b) (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a)))) (*.f64 (cos.f64 b) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (sin.f64 b) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (cos.f64 b) (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (cos.f64 b) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (sin.f64 b) r))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))
(fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r))
(fma.f64 (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) a (*.f64 (tan.f64 b) r))
(fma.f64 (tan.f64 b) r (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))))
(fma.f64 a (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (*.f64 (tan.f64 b) r))
(fma.f64 r (tan.f64 b) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (neg.f64 r) (tan.f64 b)))
(+.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))
(+.f64 (*.f64 (tan.f64 b) r) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)
(*.f64 (*.f64 (tan.f64 b) r) (tan.f64 b))
(*.f64 r (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r))) (neg.f64 (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 b)))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 b) (neg.f64 (cos.f64 b))))
(/.f64 (*.f64 (*.f64 (sin.f64 b) r) (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r)) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (tan.f64 b))) (neg.f64 (fabs.f64 (tan.f64 b))))
(*.f64 (neg.f64 (neg.f64 (tan.f64 b))) (neg.f64 (neg.f64 (tan.f64 b))))
(*.f64 (fabs.f64 (fabs.f64 (tan.f64 b))) (fabs.f64 (fabs.f64 (tan.f64 b))))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 1 binary64)) (pow.f64 (tan.f64 b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (tan.f64 b) #s(literal 1 binary64)) (tan.f64 b))
(*.f64 (fabs.f64 (tan.f64 b)) (fabs.f64 (tan.f64 b)))
(*.f64 (neg.f64 (tan.f64 b)) (neg.f64 (tan.f64 b)))
(*.f64 (tan.f64 b) (tan.f64 b))
(pow.f64 (fabs.f64 (tan.f64 b)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (tan.f64 b)) #s(literal 2 binary64))
(pow.f64 (tan.f64 b) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 #s(literal -1 binary64) (sin.f64 b)) (*.f64 #s(literal -1 binary64) (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 b) (neg.f64 (sin.f64 b))) (*.f64 (cos.f64 b) (neg.f64 (cos.f64 b))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64))))
(/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))
(fabs.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (log.f64 (cos.f64 b)) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 b)) #s(literal 2 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 (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 b)))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 b)))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)) (sqrt.f64 (sin.f64 b)))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 b))) (neg.f64 (sqrt.f64 (sin.f64 b))))
(*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))
(pow.f64 (neg.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 b)) #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) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))
(sin.f64 b)
(sqrt.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)))
(fabs.f64 (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 (*.f64 (log.f64 (sin.f64 b)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (neg.f64 (pow.f64 (sin.f64 b) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (sin.f64 b) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (sin.f64 b) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (sin.f64 b) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 1/4 binary64)) (pow.f64 (sin.f64 b) #s(literal 1/4 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 (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))
(fabs.f64 (neg.f64 (sqrt.f64 (sin.f64 b))))
(fabs.f64 (sqrt.f64 (sin.f64 b)))
(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 (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 a b))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(fma.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 a b)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(/.f64 (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 a b)
(+.f64 b 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 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))
#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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b))) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (/.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 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) 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 (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (/.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 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) 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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (tan.f64 b) r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r) (/.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 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) 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 (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (neg.f64 a))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (neg.f64 a) (*.f64 #s(literal -1 binary64) (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/15 binary64) r)) (*.f64 b b) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (tan b) b)
#s(approx (tan b) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (tan b) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 b r))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b))
#s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 b r) a) (*.f64 #s(literal 1/3 binary64) r)) b (*.f64 a r)) b r) b))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (*.f64 b b) r))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 b b) r) r) (*.f64 b b)))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/3 binary64) r)) (*.f64 b b) r) (*.f64 b b)))
#s(approx (* r (* (tan b) (tan b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 17/45 binary64) r)) (*.f64 b b) (*.f64 #s(literal 2/3 binary64) r)) (*.f64 b b) r) (*.f64 b b)))
#s(approx (* (tan b) (tan b)) (*.f64 b b))
#s(approx (* (tan b) (tan b)) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 b b) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (* (tan b) (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 b b) #s(literal 2/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (* (tan b) (tan b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 b b) #s(literal 17/45 binary64)) (*.f64 b b) #s(literal 2/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (pow (sin b) 1/2) (sqrt.f64 b))
#s(approx (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 (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 (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 (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (tan b) (tan.f64 b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (tan b) (tan b)) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))
#s(approx (sin b) (sin.f64 b))
#s(approx (pow (sin b) 1/2) (sqrt.f64 (sin.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (neg.f64 b))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 a (neg.f64 b)))))

eval59.0ms (1.1%)

Memory
32.2MiB live, 79.0MiB allocated; 7ms collecting garbage
Compiler

Compiled 12 261 to 1 895 computations (84.5% saved)

prune63.0ms (1.2%)

Memory
-5.3MiB live, 88.3MiB allocated; 5ms collecting garbage
Pruning

64 alts after pruning (60 fresh and 4 done)

PrunedKeptTotal
New47046516
Fresh61420
Picked235
Done011
Total47864542
Accuracy
99.9%
Counts
542 → 64
Alt Table
Click to see full alt table
StatusAccuracyProgram
49.5%
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
29.8%
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
▶49.6%
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
29.8%
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
50.2%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
37.0%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a b)))
▶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)))))
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.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
74.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 b) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 1/2 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.3%
(/.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.3%
(/.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))))
75.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64)) (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))))
99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal 1/2 binary64))))))
✓99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
57.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
58.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
59.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
63.8%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
59.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
56.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
60.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
55.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶37.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
38.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓75.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
57.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
62.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
✓59.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
54.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
56.0%
(/.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))))
50.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
56.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
39.3%
(/.f64 (*.f64 r (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
49.0%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
48.7%
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
49.1%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
48.9%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
49.1%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
33.4%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
75.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
55.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
56.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (cos.f64 b) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (sin.f64 b) r))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
29.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))))
▶29.3%
#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)))))))
29.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
✓59.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
▶33.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
49.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
30.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
44.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
32.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
55.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
13.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
Compiler

Compiled 2 802 to 1 938 computations (30.8% saved)

series68.0ms (1.3%)

Memory
-20.3MiB live, 74.9MiB allocated; 11ms collecting garbage
Counts
39 → 204
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))
(+.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(tan.f64 b)
(tan.f64 (PI.f64))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))
#s(literal 1 binary64)
(*.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))
(sqrt.f64 (sin.f64 b))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
Outputs
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (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 (sqrt (sin b)) 2)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) a)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (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 (+ (tan b) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ b (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* 1/3 (pow b 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* b (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* -1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* (pow b 2) (- (* -2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* b (sin (PI))) (cos (PI)))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ (sin (PI)) (cos (PI)))) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 2/15 (/ (sin (PI)) (cos (PI)))))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) #s(hole binary64 (* b r)))
#s(approx (* r (pow (sqrt (sin b)) 2)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (pow (sqrt (sin b)) 2)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (pow (sqrt (sin b)) 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 (pow (sqrt (sin b)) 2) #s(hole binary64 b))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (sqrt (sin b)) #s(hole binary64 (sqrt b)))
#s(approx (sqrt (sin b)) #s(hole binary64 (+ (sqrt b) (* -1/12 (sqrt (pow b 5))))))
#s(approx (sqrt (sin b)) #s(hole binary64 (+ (sqrt b) (* (pow b 3) (+ (* -1/12 (sqrt (/ 1 b))) (* 1/240 (sqrt (pow b 3))))))))
#s(approx (sqrt (sin b)) #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 b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (sin b)))
#s(approx (sqrt (sin b)) #s(hole binary64 (sqrt (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Calls

9 calls:

TimeVariablePointExpression
16.0ms
r
@inf
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))) (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (pow (sqrt (sin b)) 2)) (pow (sqrt (sin b)) 2) (sqrt (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
9.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)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))) (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (pow (sqrt (sin b)) 2)) (pow (sqrt (sin b)) 2) (sqrt (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
8.0ms
r
@0
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))) (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (pow (sqrt (sin b)) 2)) (pow (sqrt (sin b)) 2) (sqrt (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
8.0ms
r
@-inf
((/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (* r (sin b)) r (sin b) b (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos b) (cos a) a (* (neg (sin b)) (sin a)) (neg (sin b)) (sin a) (/ (* r (sin b)) (cos (+ a b))) (* r (tan b)) (tan b) (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))) (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (pow (sqrt (sin b)) 2)) (pow (sqrt (sin b)) 2) (sqrt (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))
7.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)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) (sin (+ (neg (+ a b)) (/ (PI) 2))) (+ (neg (+ a b)) (/ (PI) 2)) (neg (+ a b)) (+ a b) (/ (PI) 2) (PI) 2 (/ (* r (sin b)) (cos (+ a b))) (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (+ (tan b) (tan (PI))) (tan b) (tan (PI)) (- 1 (* (tan b) (tan (PI)))) 1 (* (tan b) (tan (PI))) (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (* r (pow (sqrt (sin b)) 2)) (pow (sqrt (sin b)) 2) (sqrt (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a))) (* (cos b) (cos a)) (* (sin b) (sin a)))

rewrite203.0ms (3.9%)

Memory
8.3MiB live, 194.3MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09376135
09924903
158174901
082354686
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
243 → 445
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(cos.f64 b)
(cos.f64 a)
a
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(neg.f64 (sin.f64 b))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
(*.f64 r #s(approx (tan b) b))
#s(approx (tan b) b)
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))
(+.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(tan.f64 b)
(tan.f64 (PI.f64))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64))))
#s(literal 1 binary64)
(*.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))
(sqrt.f64 (sin.f64 b))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a)))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (sin.f64 a))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (sin b)) #s(hole binary64 (* r (sin b))))
#s(approx r #s(hole binary64 r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (+ a b)))))
#s(approx (* r (tan b)) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) (+ a b))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (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 (sqrt (sin b)) 2)) #s(hole binary64 (* r (sin b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx a #s(hole binary64 a))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* a (sin b)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* 1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* -1/120 (* (pow a 2) (sin b))) (* 1/6 (sin b))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* a (+ (* -1 (sin b)) (* (pow a 2) (+ (* 1/6 (sin b)) (* (pow a 2) (+ (* -1/120 (sin b)) (* 1/5040 (* (pow a 2) (sin b)))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (/ (* a (* r (* (cos (- (* 1/2 (PI)) b)) (sin b)))) (pow (sin (- (* 1/2 (PI)) b)) 2)) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (+ (* 1/6 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))) (/ (* (cos (- (* 1/2 (PI)) b)) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b)))))) (sin (- (* 1/2 (PI)) b))))))) (+ (* -1 (/ (* r (* (pow (cos (- (* 1/2 (PI)) b)) 2) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 3))) (* -1/2 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))) (* -1 (/ (* r (* (cos (- (* 1/2 (PI)) b)) (sin b))) (pow (sin (- (* 1/2 (PI)) b)) 2))))) (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) b))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* -1 (* a (cos (- (* 1/2 (PI)) b)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* -1/2 (* a (sin (- (* 1/2 (PI)) b)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) b)) (* a (+ (* -1 (cos (- (* 1/2 (PI)) b))) (* a (+ (* -1/2 (sin (- (* 1/2 (PI)) b))) (* 1/6 (* a (cos (- (* 1/2 (PI)) b)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 a) (* 1/2 (PI))) b)))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 a) b)))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* (sin a) (sin b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ a b)))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* a (- (* 1/2 (/ (PI) a)) (+ 1 (/ b a))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 a)))
#s(approx (neg (+ a b)) #s(hole binary64 (* a (- (* -1 (/ b a)) 1))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 a) (* 1/2 (PI))) b)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 a) (* 1/2 (PI))) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* a (+ 1 (* -1 (/ (- (* 1/2 (PI)) b) a)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* a (+ 1 (/ b a))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (cos a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* -1 (* b (sin a)))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* 1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* -1/120 (* (pow b 2) (sin a))) (* 1/6 (sin a))))))))
#s(approx (* (neg (sin b)) (sin a)) #s(hole binary64 (* b (+ (* -1 (sin a)) (* (pow b 2) (+ (* 1/6 (sin a)) (* (pow b 2) (+ (* -1/120 (sin a)) (* 1/5040 (* (pow b 2) (sin a)))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b r)))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* 1/3 (* (pow b 2) r))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 2/15 (* (pow b 2) r)) (* 1/3 r)))))))
#s(approx (* r (tan b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* 1/3 r) (* (pow b 2) (+ (* 17/315 (* (pow b 2) r)) (* 2/15 r)))))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* b r) (sin (- (* 1/2 (PI)) a)))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (/ r (sin (- (* 1/2 (PI)) a))) (/ (* b (* r (cos (- (* 1/2 (PI)) a)))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (cos (- (* 1/2 (PI)) a)) (- (* -1/6 (/ r (sin (- (* 1/2 (PI)) a)))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (sin (- (* 1/2 (PI)) a)))) (+ (* -1/2 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))) (* 1/6 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))))) (* -1/6 (/ r (sin (- (* 1/2 (PI)) a))))) (+ (* -1 (/ (* r (pow (cos (- (* 1/2 (PI)) a)) 2)) (pow (sin (- (* 1/2 (PI)) a)) 3))) (* -1/2 (/ r (sin (- (* 1/2 (PI)) a))))))) (* -1 (/ (* r (cos (- (* 1/2 (PI)) a))) (pow (sin (- (* 1/2 (PI)) a)) 2))))) (/ r (sin (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) a))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* -1 (* b (cos (- (* 1/2 (PI)) a)))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* -1/2 (* b (sin (- (* 1/2 (PI)) a)))))))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) a)) (* b (+ (* -1 (cos (- (* 1/2 (PI)) a))) (* b (+ (* -1/2 (sin (- (* 1/2 (PI)) a))) (* 1/6 (* b (cos (- (* 1/2 (PI)) a)))))))))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (- (+ (* -1 b) (* 1/2 (PI))) a)))
#s(approx (neg (+ a b)) #s(hole binary64 (- (* -1 b) a)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (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 (+ (tan b) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ b (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* 1/3 (pow b 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* b (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* -1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* (pow b 2) (- (* -2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* b (sin (PI))) (cos (PI)))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* 1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (* b (+ (* (pow b 2) (+ (* 1/3 (/ (sin (PI)) (cos (PI)))) (* (pow b 2) (+ (* 17/315 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 2/15 (/ (sin (PI)) (cos (PI)))))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) (- (* (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 (pow (sqrt (sin b)) 2)) #s(hole binary64 (* b r)))
#s(approx (* r (pow (sqrt (sin b)) 2)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (pow (sqrt (sin b)) 2)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (pow (sqrt (sin b)) 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 (pow (sqrt (sin b)) 2) #s(hole binary64 b))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx (sqrt (sin b)) #s(hole binary64 (sqrt b)))
#s(approx (sqrt (sin b)) #s(hole binary64 (+ (sqrt b) (* -1/12 (sqrt (pow b 5))))))
#s(approx (sqrt (sin b)) #s(hole binary64 (+ (sqrt b) (* (pow b 3) (+ (* -1/12 (sqrt (/ 1 b))) (* 1/240 (sqrt (pow b 3))))))))
#s(approx (sqrt (sin b)) #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 b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (sin a))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (cos a)))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos b) (cos a)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (sin a)) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* b (- (* 1/2 (/ (PI) b)) (+ 1 (/ a b))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* b (- (* -1 (/ a b)) 1))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI)))))))
#s(approx (* (tan b) (tan (PI))) #s(hole binary64 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))
#s(approx (pow (sqrt (sin b)) 2) #s(hole binary64 (sin b)))
#s(approx (sqrt (sin b)) #s(hole binary64 (sqrt (sin b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
#s(approx (/ (* r (sin b)) (sin (+ (neg (+ a b)) (/ (PI) 2)))) #s(hole binary64 (/ (* r (sin b)) (sin (- (+ (* -1 b) (* 1/2 (PI))) a)))))
#s(approx (sin (+ (neg (+ a b)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ (* -1 b) (* 1/2 (PI))) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (- (* 1/2 (PI)) a) b)))))))
#s(approx (neg (+ a b)) #s(hole binary64 (* -1 (* b (+ 1 (/ a b))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (cos.f64 (+.f64 a (neg.f64 b))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (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))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.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 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 #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 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 a (neg.f64 b))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.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 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 a (neg.f64 b)))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(fma.f64 #s(literal 0 binary64) (sin.f64 b) (*.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)
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 1 binary64)))
(fma.f64 (sin.f64 a) #s(literal 0 binary64) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal -1 binary64) a (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(+.f64 (*.f64 (sin.f64 a) #s(literal 0 binary64)) (*.f64 (cos.f64 a) #s(literal 1 binary64)))
a
(*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))
(*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))
(*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(*.f64 #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 (+.f64 a (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (PI.f64)) a)) (cos.f64 (+.f64 (+.f64 b (PI.f64)) a))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a (+.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))
(/.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 (+.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 (-.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))
(neg.f64 (sin.f64 b))
(fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(fma.f64 (sin.f64 b) #s(literal -1 binary64) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(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 (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 b) #s(literal 0 binary64)))
(sin.f64 a)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b) r))
(*.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b) r)
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b)
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(fma.f64 (neg.f64 (sin.f64 #s(approx (+ a b) b))) #s(literal 0 binary64) (*.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 #s(approx (+ a b) b)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 #s(approx (+ a b) b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 #s(approx (+ a b) b))) #s(literal 0 binary64)) (*.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 #s(approx (+ a b) b)) (neg.f64 #s(approx (+ a b) b))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 #s(approx (+ a b) b)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (neg.f64 #s(approx (+ a b) b)) (neg.f64 #s(approx (+ a b) b)) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 #s(approx (+ a b) b)))
(+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 #s(approx (+ a b) b))
#s(approx (+ a b) b)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (tan.f64 b) r))
(*.f64 (tan.f64 b) r)
(*.f64 r (tan.f64 b))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) r)) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 b)))
(/.f64 (*.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) r) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 b))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (PI.f64) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 b (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(+.f64 (/.f64 (tan.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 b)) #s(literal 0 binary64)) (-.f64 (tan.f64 b) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (tan.f64 b) (tan.f64 b) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (neg.f64 (sin.f64 b)) (*.f64 #s(literal -1 binary64) (cos.f64 b)))
(+.f64 #s(literal 0 binary64) (tan.f64 b))
(+.f64 (tan.f64 b) #s(literal 0 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (PI.f64) (+.f64 b (PI.f64))))
(tan.f64 (+.f64 (+.f64 (PI.f64) (PI.f64)) b))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 b (+.f64 (PI.f64) (PI.f64))))
(tan.f64 (+.f64 (+.f64 b (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(+.f64 (/.f64 (tan.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
#s(literal 0 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (tan.f64 b)) (*.f64 #s(literal 0 binary64) (tan.f64 b)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 0 binary64) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) (tan.f64 b)) (*.f64 #s(literal 0 binary64) (tan.f64 b)) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 b)) #s(literal 0 binary64)))
#s(literal 1 binary64)
(*.f64 #s(literal 0 binary64) (tan.f64 b))
(*.f64 (tan.f64 b) #s(literal 0 binary64))
(*.f64 (sin.f64 b) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 b))))
(/.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 b)) (cos.f64 b)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 b))) (neg.f64 (*.f64 #s(literal -1 binary64) (cos.f64 b))))
(/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 b)) (*.f64 #s(literal -1 binary64) (cos.f64 b)))
(*.f64 r (/.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) r) (cos.f64 (+.f64 a b)))
(*.f64 (pow.f64 (sin.f64 b) #s(literal 1 binary64)) r)
(*.f64 r (pow.f64 (sin.f64 b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (sin.f64 b)) (sqrt.f64 (sin.f64 b)))
(pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))
(pow.f64 (sin.f64 b) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 b))) #s(literal 2 binary64))))
(pow.f64 (sin.f64 b) #s(literal 1/2 binary64))
(sqrt.f64 (sin.f64 b))
(exp.f64 (*.f64 (log.f64 (sin.f64 b)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (cos.f64 (+.f64 a (neg.f64 b))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (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))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.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 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 a)) (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (neg.f64 (sin.f64 b)) (sin.f64 a) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal -1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))
(fma.f64 #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 1 binary64) (cos.f64 (+.f64 a b)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 a (neg.f64 b))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a))
(sin.f64 (+.f64 a (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.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 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (neg.f64 (sin.f64 b))) (sin.f64 a)))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 a (neg.f64 b)))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (-.f64 a (neg.f64 b))))
(cos.f64 (-.f64 a (neg.f64 b)))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (*.f64 (sin.f64 (-.f64 a (neg.f64 b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (+.f64 a b)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 a b))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b)) (sin.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) a b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (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 (+.f64 a (neg.f64 b))) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 a))) (cos.f64 (-.f64 b (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (sin b)) (*.f64 (sin.f64 b) r))
#s(approx r r)
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))
#s(approx (* r (tan b)) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (pow (sqrt (sin b)) 2)) (*.f64 (sin.f64 b) r))
#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 (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (/.f64 (*.f64 (*.f64 a r) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (/.f64 (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (*.f64 (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) #s(literal 1/6 binary64))))) (fma.f64 (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))) #s(literal -1/2 binary64) (neg.f64 (*.f64 r (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64))))))) a (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) a (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal -1/2 binary64))) a (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))
#s(approx (neg (+ a b)) (neg.f64 b))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 a) b))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (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 (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))) (sin.f64 b)) (cos.f64 b))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (tan.f64 b) r) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))))) a (*.f64 (tan.f64 b) r)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/2 binary64) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (cos.f64 b)) #s(literal -1/720 binary64) (*.f64 #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 (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (PI.f64) a) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 b a)) a))
#s(approx (neg (+ a b)) (neg.f64 a))
#s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64)) a))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (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 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 a)) b)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (neg (+ a b)) (*.f64 (neg.f64 a) (+.f64 (/.f64 b a) #s(literal 1 binary64))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (sin b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) r)) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) r)) (*.f64 b b) r) b))
#s(approx (sin b) b)
#s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) b (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b (neg.f64 (sin.f64 a))) b (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (neg.f64 b) (sin.f64 a)))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (sin.f64 a) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/120 binary64)) (sin.f64 a) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (* (neg (sin b)) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) (sin.f64 a) (*.f64 #s(literal -1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal 1/6 binary64) (sin.f64 a))) (*.f64 b b) (neg.f64 (sin.f64 a))) b))
#s(approx (neg (sin b)) (neg.f64 b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/120 binary64) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (tan b)) (*.f64 b r))
#s(approx (* r (tan b)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 b b) r) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (* r (tan b)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 (*.f64 b b) r) (*.f64 #s(literal 2/15 binary64) r)) (*.f64 b b) (*.f64 #s(literal 1/3 binary64) r)) (*.f64 b b) r) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b)
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 b (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (fma.f64 (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) r) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (*.f64 r (/.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) b (/.f64 r (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal -1/2 binary64))) b (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))
#s(approx (neg (+ a b)) (-.f64 (neg.f64 b) a))
#s(approx (* r (tan b)) (*.f64 #s(literal 0 binary64) r))
#s(approx (* r (tan b)) (fma.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (tan b)) (fma.f64 (-.f64 (fma.f64 b (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)) r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (tan b)) (fma.f64 (-.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) r) (fma.f64 #s(literal -1/3 binary64) (*.f64 #s(literal 0 binary64) r) (neg.f64 (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal 1 binary64))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)))) b r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 #s(literal 1 binary64) b #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) b #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (tan b) (tan (PI))) #s(literal 0 binary64))
#s(approx (+ (tan b) (tan (PI))) (+.f64 #s(literal 0 binary64) b))
#s(approx (+ (tan b) (tan (PI))) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (tan b) (tan (PI))) (fma.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(literal 0 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (*.f64 #s(literal 0 binary64) b) #s(literal -1 binary64) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal -1/3 binary64)) #s(literal 0 binary64)) b #s(literal 1 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/15 binary64) (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 0 binary64)) (*.f64 b b)) #s(literal 0 binary64)) b #s(literal 1 binary64)))
#s(approx (* (tan b) (tan (PI))) (*.f64 #s(literal 0 binary64) b))
#s(approx (* (tan b) (tan (PI))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 1/3 binary64) #s(literal 0 binary64)) b))
#s(approx (* (tan b) (tan (PI))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 2/15 binary64) #s(literal 0 binary64)) (*.f64 b b) #s(literal 0 binary64)) b))
#s(approx (* (tan b) (tan (PI))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 17/315 binary64) #s(literal 0 binary64)) (*.f64 b b) #s(literal 0 binary64)) (*.f64 b b) #s(literal 0 binary64)) b))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (pow (sqrt (sin b)) 2)) (*.f64 b r))
#s(approx (* r (pow (sqrt (sin b)) 2)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) r) #s(literal -1/6 binary64) r) b))
#s(approx (* r (pow (sqrt (sin b)) 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 (sqrt (sin b)) 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 (pow (sqrt (sin b)) 2) b)
#s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))
#s(approx (pow (sqrt (sin b)) 2) (*.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 (pow (sqrt (sin b)) 2) (*.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 (sqrt (sin b)) (sqrt.f64 b))
#s(approx (sqrt (sin b)) (fma.f64 (pow.f64 b #s(literal 5/2 binary64)) #s(literal -1/12 binary64) (sqrt.f64 b)))
#s(approx (sqrt (sin b)) (fma.f64 (fma.f64 (pow.f64 b #s(literal 3/2 binary64)) #s(literal 1/240 binary64) (*.f64 (pow.f64 (sqrt.f64 b) #s(literal -1 binary64)) #s(literal -1/12 binary64))) (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 b)))
#s(approx (sqrt (sin b)) (fma.f64 (fma.f64 (*.f64 (pow.f64 (sqrt.f64 b) #s(literal -1 binary64)) #s(literal 1/1440 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sqrt.f64 b) #s(literal -1 binary64)) #s(literal -1/12 binary64))) (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 b)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (cos.f64 a))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal -1/2 binary64) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos b) (cos a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (cos.f64 a)) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (sin b) (sin.f64 b))
#s(approx (cos b) (cos.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (PI.f64) b) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 a b)) b))
#s(approx (neg (+ a b)) (*.f64 (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64)) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (+ (tan b) (tan (PI))) (+.f64 #s(literal 0 binary64) (tan.f64 b)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
#s(approx (* (tan b) (tan (PI))) (*.f64 #s(literal 0 binary64) (tan.f64 b)))
#s(approx (pow (sqrt (sin b)) 2) (sin.f64 b))
#s(approx (sqrt (sin b)) (sqrt.f64 (sin.f64 b)))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 (sin.f64 b) r) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
#s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a)))
#s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 b) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a) b) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (neg (+ a b)) (*.f64 (neg.f64 b) (+.f64 (/.f64 a b) #s(literal 1 binary64))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))

eval88.0ms (1.7%)

Memory
23.9MiB live, 69.2MiB allocated; 5ms collecting garbage
Compiler

Compiled 12 606 to 1 889 computations (85% saved)

prune183.0ms (3.6%)

Memory
-32.2MiB live, 85.2MiB allocated; 96ms collecting garbage
Pruning

73 alts after pruning (66 fresh and 7 done)

PrunedKeptTotal
New44525470
Fresh144155
Picked235
Done044
Total46173534
Accuracy
99.9%
Counts
534 → 73
Alt Table
Click to see full alt table
StatusAccuracyProgram
49.5%
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
29.8%
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
✓49.6%
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
29.8%
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
50.2%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
37.0%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a b)))
55.3%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
▶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) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
57.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
59.2%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
63.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))))
59.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (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)))))
99.2%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
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.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
74.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 b) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 1/2 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.3%
(/.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.3%
(/.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))))
75.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64)) (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))))
▶99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal 1/2 binary64))))))
✓99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
58.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
56.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
60.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
▶55.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
38.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
37.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
16.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
16.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
✓75.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
57.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
62.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
✓59.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
54.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
56.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
50.8%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
56.7%
(/.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))))
39.3%
(/.f64 (*.f64 r (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
49.0%
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
49.1%
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
48.7%
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
48.9%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
33.4%
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
49.1%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
33.4%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
75.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
49.4%
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
34.5%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
55.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
56.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (cos.f64 b) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (sin.f64 b) r))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
29.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))))
▶29.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
58.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
29.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
✓59.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
▶14.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
✓33.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
30.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
44.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
32.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
55.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
13.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
Compiler

Compiled 3 329 to 2 313 computations (30.5% saved)

series43.0ms (0.8%)

Memory
13.7MiB live, 64.0MiB allocated; 8ms collecting garbage
Counts
36 → 169
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
(cos.f64 b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(literal 0 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))
(+.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(tan.f64 b)
(tan.f64 (PI.f64))
(PI.f64)
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))
#s(literal 1 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 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(pow.f64 (sin.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)
Outputs
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (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) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx a #s(hole binary64 a))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* 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 (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 a))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ 1 a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow a 2))) a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ (+ 1 (* (pow a 2) (+ 1/6 (* 7/360 (pow a 2))))) a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ (+ 1 (* (pow a 2) (+ 1/6 (* (pow a 2) (+ 7/360 (* 31/15120 (pow a 2))))))) a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (- (* (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 b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (sin a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ 1 (sin a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (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 (+ (tan b) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ b (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* 1/3 (pow b 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* b (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* -1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* (pow b 2) (- (* -2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (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 (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- a (* -1 b))))))
Calls

9 calls:

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

rewrite139.0ms (2.7%)

Memory
1.3MiB live, 92.6MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06635354
07134279
039674079
Stop Event
1×iter limit
1×iter limit
1×node limit
1×iter limit
Counts
205 → 282
Calls
Call 1
Inputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(neg.f64 (sin.f64 b))
(*.f64 (cos.f64 a) (cos.f64 b))
(cos.f64 a)
(cos.f64 b)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(literal 0 binary64)
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))))
(/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))
(+.f64 (tan.f64 b) (tan.f64 (PI.f64)))
(tan.f64 b)
(tan.f64 (PI.f64))
(PI.f64)
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))
#s(literal 1 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 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
(-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))))
(*.f64 (cos.f64 b) (cos.f64 a))
(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(pow.f64 (sin.f64 a) #s(literal -1 binary64))
#s(literal -1 binary64)
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* r (sin b)) (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b))))))
#s(approx (* r (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) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #s(hole binary64 (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (sin a) (sin b))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* -1/2 (* a (cos b))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos b) (* a (+ (* -1 (sin b)) (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))))))))
#s(approx (sin a) #s(hole binary64 a))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (sin a) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx a #s(hole binary64 a))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos b)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* -1/2 (* (pow a 2) (cos b))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* 1/24 (* (pow a 2) (cos b))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos b) (* (pow a 2) (+ (* -1/2 (cos b)) (* (pow a 2) (+ (* -1/720 (* (pow a 2) (cos b))) (* 1/24 (cos b)))))))))
#s(approx (cos a) #s(hole binary64 1))
#s(approx (cos a) #s(hole binary64 (+ 1 (* -1/2 (pow a 2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* 1/24 (pow a 2)) 1/2)))))
#s(approx (cos a) #s(hole binary64 (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/24 (* -1/720 (pow a 2)))) 1/2)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (/ (* a (* r (pow (sin b) 2))) (pow (cos b) 2)) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* -1 (* a (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (+ (* a (- (* a (- (* -1 (* a (+ (* -1/2 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (+ (* 1/6 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))) (/ (* (sin b) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b))))) (cos b)))))) (+ (* -1 (/ (* r (pow (sin b) 3)) (pow (cos b) 3))) (* -1/2 (/ (* r (sin b)) (cos b)))))) (* -1 (/ (* r (pow (sin b) 2)) (pow (cos b) 2))))) (/ (* r (sin b)) (cos b)))))
#s(approx (/ (* 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 (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #s(hole binary64 (/ (* r (sin b)) (cos b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (cos b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos b) (* -1 (* a (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos b) (* a (- (* a (+ (* -1/2 (cos b)) (* 1/6 (* a (sin b))))) (sin b))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (sin b))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (+ (sin b) (* -1/6 (* (pow a 2) (sin b)))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* 1/120 (* (pow a 2) (sin b)))))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* a (+ (sin b) (* (pow a 2) (+ (* -1/6 (sin b)) (* (pow a 2) (+ (* -1/5040 (* (pow a 2) (sin b))) (* 1/120 (sin b))))))))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 a))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (* a (+ 1 (* -1/6 (pow a 2))))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* 1/120 (pow a 2)) 1/6))))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (* a (+ 1 (* (pow a 2) (- (* (pow a 2) (+ 1/120 (* -1/5040 (pow a 2)))) 1/6))))))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ 1 a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow a 2))) a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ (+ 1 (* (pow a 2) (+ 1/6 (* 7/360 (pow a 2))))) a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ (+ 1 (* (pow a 2) (+ 1/6 (* (pow a 2) (+ 7/360 (* 31/15120 (pow a 2))))))) a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (* -1 (* (sin a) (sin b))) (* (cos a) (cos b)))))
#s(approx (sin a) #s(hole binary64 (sin a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (* (cos a) (cos b))))
#s(approx (cos a) #s(hole binary64 (cos a)))
#s(approx (- (* (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 b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (- (* (cos a) (cos b)) (* (sin a) (sin b)))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* (sin a) (sin b))))
#s(approx (/ 1 (pow (sin a) -1)) #s(hole binary64 (sin a)))
#s(approx (pow (sin a) -1) #s(hole binary64 (/ 1 (sin a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* r (sin b)) (cos (- b (* -1 a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b r)))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* -1/6 (* (pow b 2) r))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* 1/120 (* (pow b 2) r))))))))
#s(approx (* r (sin b)) #s(hole binary64 (* b (+ r (* (pow b 2) (+ (* -1/6 r) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) r)) (* 1/120 r)))))))))
#s(approx (sin b) #s(hole binary64 b))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* -1/6 (pow b 2))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* 1/120 (pow b 2)) 1/6))))))
#s(approx (sin b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/120 (* -1/5040 (pow b 2)))) 1/6))))))
#s(approx b #s(hole binary64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (cos a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* -1/2 (* b (cos a))))))))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) #s(hole binary64 (+ (cos a) (* b (+ (* -1 (sin a)) (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))))))))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 b)))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* 1/6 (pow b 2)) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* -1/120 (pow b 2)))) 1))))
#s(approx (neg (sin b)) #s(hole binary64 (* b (- (* (pow b 2) (+ 1/6 (* (pow b 2) (- (* 1/5040 (pow b 2)) 1/120)))) 1))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (cos a)))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* -1/2 (* (pow b 2) (cos a))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* 1/24 (* (pow b 2) (cos a))))))))
#s(approx (* (cos a) (cos b)) #s(hole binary64 (+ (cos a) (* (pow b 2) (+ (* -1/2 (cos a)) (* (pow b 2) (+ (* -1/720 (* (pow b 2) (cos a))) (* 1/24 (cos a)))))))))
#s(approx (cos b) #s(hole binary64 1))
#s(approx (cos b) #s(hole binary64 (+ 1 (* -1/2 (pow b 2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* 1/24 (pow b 2)) 1/2)))))
#s(approx (cos b) #s(hole binary64 (+ 1 (* (pow b 2) (- (* (pow b 2) (+ 1/24 (* -1/720 (pow b 2)))) 1/2)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (/ r (cos a)) (/ (* b (* r (sin a))) (pow (cos a) 2))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(hole binary64 (* b (+ (* b (- (* b (- (+ (* -1 (* b (+ (* -1 (/ (* (sin a) (- (* -1/6 (/ r (cos a))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (cos a))) (+ (* -1/2 (/ (* r (sin a)) (pow (cos a) 2))) (* 1/6 (/ (* r (sin a)) (pow (cos a) 2))))))) (* -1/6 (/ r (cos a)))) (+ (* -1 (/ (* r (pow (sin a) 2)) (pow (cos a) 3))) (* -1/2 (/ r (cos a)))))) (* -1 (/ (* r (sin a)) (pow (cos a) 2))))) (/ r (cos a))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (/ (* r (sin (PI))) (cos (PI)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (/ (* b (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) #s(hole binary64 (+ (* b (- (+ r (* b (- (* b (- (* 1/3 r) (+ (* -1 (/ (* (pow (sin (PI)) 2) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2)))))) (* -1 (/ (* (sin (PI)) (- r (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (* r (pow (sin (PI)) 2)) (pow (cos (PI)) 2))))) (/ (* r (sin (PI))) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (+ (* b (- (+ 1 (* b (- (* b (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (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 (+ (tan b) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ b (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* 1/3 (pow b 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 b))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* 1/3 (pow b 2))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* 2/15 (pow b 2))))))))
#s(approx (tan b) #s(hole binary64 (* b (+ 1 (* (pow b 2) (+ 1/3 (* (pow b 2) (+ 2/15 (* 17/315 (pow b 2))))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* b (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* -1/3 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (+ 1 (* b (- (* (pow b 2) (- (* -2/15 (/ (* (pow b 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (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 (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #s(hole binary64 (/ (* b r) (cos a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1))))) #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) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (cos a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos a) (* -1 (* b (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos a) (* b (- (* -1/2 (* b (cos a))) (sin a))))))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) #s(hole binary64 (+ (cos a) (* b (- (* b (+ (* -1/2 (cos a)) (* 1/6 (* b (sin a))))) (sin a))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (sin a))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (+ (sin a) (* -1/6 (* (pow b 2) (sin a)))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* 1/120 (* (pow b 2) (sin a)))))))))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) #s(hole binary64 (* b (+ (sin a) (* (pow b 2) (+ (* -1/6 (sin a)) (* (pow b 2) (+ (* -1/5040 (* (pow b 2) (sin a))) (* 1/120 (sin a))))))))))
#s(approx (sin b) #s(hole binary64 (sin b)))
#s(approx (neg (sin b)) #s(hole binary64 (* -1 (sin b))))
#s(approx (cos b) #s(hole binary64 (cos b)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI))))))))
#s(approx (+ (tan b) (tan (PI))) #s(hole binary64 (+ (/ (sin b) (cos b)) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan b) #s(hole binary64 (/ (sin b) (cos b))))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin b) (sin (PI))) (* (cos b) (cos (PI)))))))
#s(approx (/ (* r (sin b)) (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 (*.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
r
(sin.f64 b)
b
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 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 (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))) (-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 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 (*.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 #s(literal -1 binary64) (*.f64 (sin.f64 a) (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)))
(sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (-.f64 a (neg.f64 b)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))
(-.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(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 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(sin.f64 a)
a
(*.f64 #s(literal -1 binary64) (sin.f64 b))
(*.f64 (sin.f64 b) #s(literal -1 binary64))
(neg.f64 (sin.f64 b))
(sin.f64 (neg.f64 b))
(sin.f64 (+.f64 b (PI.f64)))
(cos.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(sin.f64 (+.f64 a (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 a))
(cos.f64 a)
(sin.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 b))
(cos.f64 b)
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)) r))
(*.f64 #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)) r)
(*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(literal 0 binary64)
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))) r))
(*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))) r)
(*.f64 r (/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) r) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b))) (neg.f64 #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))
(+.f64 (/.f64 (tan.f64 b) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))) (/.f64 #s(literal 0 binary64) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (tan.f64 b) (tan.f64 b)) #s(literal 0 binary64)) (-.f64 (tan.f64 b) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (tan.f64 b) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (tan.f64 b) (tan.f64 b) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 b) (*.f64 (cos.f64 b) #s(literal 0 binary64))) (*.f64 #s(literal -1 binary64) (cos.f64 b)))
(+.f64 #s(literal 0 binary64) (tan.f64 b))
(+.f64 (tan.f64 b) #s(literal 0 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(tan.f64 (+.f64 b (PI.f64)))
(tan.f64 b)
(+.f64 (/.f64 (tan.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b)))))
#s(literal 0 binary64)
(PI.f64)
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 r (/.f64 (sin.f64 b) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 (sin.f64 b) r) (-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (*.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) #s(approx (* (cos a) (cos b)) (cos.f64 a))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (+.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (cos a) (cos b)) (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 a) (cos b)) (cos.f64 a)) #s(approx (* (cos a) (cos b)) (cos.f64 a)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(-.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))
(+.f64 #s(approx (* (cos a) (cos b)) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) r)) (neg.f64 (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sin.f64 b) r) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (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 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b))))))
(fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))
(fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))
(-.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b)))
(+.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 b a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a b))) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 a) #s(literal 1 binary64)) (sin.f64 b))
(*.f64 (sin.f64 b) (pow.f64 (sin.f64 a) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 b) #s(literal 1 binary64)) (pow.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 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 a) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)))
(pow.f64 (sin.f64 a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 a)))
(/.f64 #s(literal 1 binary64) (sin.f64 a))
(exp.f64 (*.f64 (log.f64 (sin.f64 a)) #s(literal -1 binary64)))
#s(literal -1 binary64)
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a (neg.f64 (sin.f64 b))) a (cos.f64 b)))
#s(approx (sin a) a)
#s(approx (sin a) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx a a)
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (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)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 b) a) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) a) (sin.f64 b)) a (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 a a) #s(literal -1/2 binary64)) (cos.f64 b) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a a)) (cos.f64 b) (*.f64 #s(literal 1/24 binary64) (cos.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (cos.f64 b))) (*.f64 a a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/6 binary64) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 (tan.f64 b) r))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (fma.f64 (tan.f64 b) r (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (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)) (* (sin b) (/ 1 (pow (sin a) -1))))) (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)) (* (sin b) (/ 1 (pow (sin a) -1)))) (cos.f64 b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (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 (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (sin.f64 b) a))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/6 binary64) (sin.f64 b)) a))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (sin.f64 b)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 b))) (*.f64 a a) (*.f64 #s(literal -1/6 binary64) (sin.f64 b))) (*.f64 a a) (sin.f64 b)) a))
#s(approx (/ 1 (pow (sin a) -1)) a)
#s(approx (/ 1 (pow (sin a) -1)) (*.f64 (fma.f64 (*.f64 a a) #s(literal -1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (/ 1 (pow (sin a) -1)) (*.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 (/ 1 (pow (sin a) -1)) (*.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 (pow (sin a) -1) (pow.f64 a #s(literal -1 binary64)))
#s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))
#s(approx (pow (sin a) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 a a) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (pow (sin a) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 a a) #s(literal 7/360 binary64)) (*.f64 a a) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 (+.f64 a b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 (+.f64 a b)))
#s(approx (* (cos a) (cos b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (cos.f64 (+.f64 a b)))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (/ 1 (pow (sin a) -1)) (sin.f64 a))
#s(approx (pow (sin a) -1) (pow.f64 (sin.f64 a) #s(literal -1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (-.f64 b (neg.f64 a)))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* 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 (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) b) (cos.f64 a) (neg.f64 (sin.f64 a))) b (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b (neg.f64 (sin.f64 a))) b (cos.f64 a)))
#s(approx (neg (sin b)) (neg.f64 b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (neg (sin b)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 b b)) #s(literal 1/120 binary64)) (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 b b)) #s(literal 1 binary64)) b))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (cos b) #s(literal 1 binary64))
#s(approx (cos b) (fma.f64 (*.f64 b b) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (cos b) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 b b)) #s(literal 1/2 binary64)) (*.f64 b b) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (*.f64 #s(literal 0 binary64) r))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 (fma.f64 b (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)) r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (* r (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI)))))) (fma.f64 (-.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) r) (fma.f64 #s(literal -1/3 binary64) (*.f64 #s(literal 0 binary64) r) (neg.f64 (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal 1 binary64))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 r (*.f64 #s(literal 0 binary64) r)) #s(literal 0 binary64)) #s(literal -1 binary64)))) b r) (*.f64 #s(literal 0 binary64) r)) b (*.f64 #s(literal 0 binary64) r)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 #s(literal 1 binary64) b #s(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) b #s(literal 0 binary64)) b #s(literal 1 binary64)) #s(literal 0 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (tan b) (tan (PI))) #s(literal 0 binary64))
#s(approx (+ (tan b) (tan (PI))) (+.f64 #s(literal 0 binary64) b))
#s(approx (+ (tan b) (tan (PI))) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b #s(literal 0 binary64)))
#s(approx (+ (tan b) (tan (PI))) (fma.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(literal 0 binary64)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) b)
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 b b) #s(literal 2/15 binary64)) (*.f64 b b) #s(literal 1/3 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))
#s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (*.f64 #s(literal 0 binary64) b) #s(literal -1 binary64) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal -1/3 binary64)) #s(literal 0 binary64)) b #s(literal 1 binary64)))
#s(approx (- 1 (* (tan b) (tan (PI)))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/15 binary64) (*.f64 (*.f64 b b) #s(literal 0 binary64)) #s(literal 0 binary64)) (*.f64 b b)) #s(literal 0 binary64)) b #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (cos.f64 a))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (cos.f64 a))
#s(approx (* (cos a) (cos b)) (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/2 binary64)) (cos.f64 a) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (cos.f64 a) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (cos a) (cos b)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) #s(literal -1/720 binary64)) (cos.f64 a) (*.f64 #s(literal 1/24 binary64) (cos.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) (*.f64 b b) (cos.f64 a)))
#s(approx (* (sin b) (sin a)) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (* (sin b) (sin a)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) b) (neg.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 b) (fma.f64 (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (sin.f64 a)) (cos.f64 a)))) (-.f64 (*.f64 (/.f64 r (cos.f64 a)) #s(literal -1/6 binary64)) (fma.f64 (/.f64 r (cos.f64 a)) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) r) (pow.f64 (cos.f64 a) #s(literal 3 binary64))))))) b (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 a) r) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))) b (/.f64 r (cos.f64 a))) b))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (cos.f64 a))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a)))
#s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 a) b) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 a))) b) (sin.f64 a)) b (cos.f64 a)))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (sin.f64 a) b))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/6 binary64) (sin.f64 a)) b))
#s(approx (* (sin b) (/ 1 (pow (sin a) -1))) (*.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) (/ 1 (pow (sin a) -1))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) (sin.f64 a)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 a))) (*.f64 b b) (*.f64 #s(literal -1/6 binary64) (sin.f64 a))) (*.f64 b b) (sin.f64 a)) b))
#s(approx (sin b) (sin.f64 b))
#s(approx (neg (sin b)) (neg.f64 (sin.f64 b)))
#s(approx (cos b) (cos.f64 b))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (+ (tan b) (tan (PI))) (+.f64 #s(literal 0 binary64) (tan.f64 b)))
#s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) (tan.f64 b))
#s(approx (- 1 (* (tan b) (tan (PI)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 b))))
#s(approx (/ (* r (sin b)) (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b)))) (*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))

eval47.0ms (0.9%)

Memory
1.9MiB live, 51.5MiB allocated; 9ms collecting garbage
Compiler

Compiled 9 969 to 1 245 computations (87.5% saved)

prune87.0ms (1.7%)

Memory
-19.6MiB live, 120.6MiB allocated; 8ms collecting garbage
Pruning

78 alts after pruning (67 fresh and 11 done)

PrunedKeptTotal
New33916355
Fresh105161
Picked145
Done077
Total35078428
Accuracy
99.9%
Counts
428 → 78
Alt Table
Click to see full alt table
StatusAccuracyProgram
49.5%
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
29.8%
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
✓49.6%
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
29.8%
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
50.2%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
58.9%
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
37.0%
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a b)))
75.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (sin.f64 (+.f64 b (PI.f64))) (*.f64 (cos.f64 a) (cos.f64 b))))
✓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))))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #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))) (cos.f64 b))))
56.1%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 b))))
60.4%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 b))))
59.9%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 #s(approx (sin b) b)) (*.f64 (cos.f64 a) (cos.f64 b))))
✓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))))
57.7%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
59.2%
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
63.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 (-.f64 (pow.f64 (*.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)))))
99.2%
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
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.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
74.9%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 b) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 1/2 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
99.3%
(/.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.3%
(/.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))))
75.3%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 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) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 a))))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)))))))
76.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
49.7%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal 1/2 binary64))))))
✓99.4%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
58.0%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (/ 1 (pow (sin a) -1)) (*.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)))))
56.2%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
39.0%
(/.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))))
✓55.1%
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
37.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))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
38.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
39.3%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
37.8%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
16.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
16.6%
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
✓75.2%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
57.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))))
62.8%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
✓59.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
54.0%
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))
56.7%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
56.0%
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
39.3%
(/.f64 (*.f64 r (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
49.0%
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
49.1%
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
48.7%
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
48.9%
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
49.6%
(/.f64 (*.f64 r #s(approx (sin b) b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
33.4%
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
49.1%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 (+.f64 a b)))
33.4%
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
99.4%
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
75.2%
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
49.4%
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
34.5%
#s(approx (/ (* r (sin b)) (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a)))) (/.f64 (*.f64 b r) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
55.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
56.4%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (cos.f64 b) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (sin.f64 b) r))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
29.9%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))))
29.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
✓29.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
58.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
29.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
✓59.0%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
✓14.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (/ (+ (tan b) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
✓33.6%
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r #s(approx (tan b) b)))
30.3%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
44.7%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
32.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
55.1%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
13.2%
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
Compiler

Compiled 4 535 to 1 853 computations (59.1% saved)

regimes118.0ms (2.3%)

Memory
8.6MiB live, 148.3MiB allocated; 14ms collecting garbage
Counts
113 → 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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (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 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(/.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 (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.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 (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (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))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #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 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 #s(approx (sin b) b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a 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 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos 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))) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (/ 1 (pow (sin a) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (*.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 (sin.f64 a) (sin.f64 (+.f64 b (PI.f64))) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64)))) (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) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64)) (sin.f64 a))))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 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) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 a) #s(literal -1 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (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)) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 b) #s(literal -1 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 (fma.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))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r))) a (*.f64 (tan.f64 b) r)))
#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))))
(/.f64 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) #s(literal -1/2 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) (cos.f64 a)) (*.f64 (sin.f64 b) (*.f64 (pow.f64 (sin.f64 a) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (*.f64 (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 a) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 b) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 b) #s(literal 1/2 binary64))) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) r) a) (cos.f64 b) (*.f64 (pow.f64 (cos.f64 b) #s(literal 2 binary64)) (*.f64 (sin.f64 b) r))) (pow.f64 (cos.f64 b) #s(literal 3 binary64))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 a) #s(literal -1/2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 b) r) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64))) (*.f64 (tan.f64 b) r))))
(/.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))))
#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))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (sin.f64 a) (sin.f64 b)))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)) (fma.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))))
(/.f64 (*.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (-.f64 (*.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))))))
Outputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
Calls

4 calls:

30.0ms
b
29.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
27.0ms
r
26.0ms
a
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.8%)

Memory
-2.4MiB live, 141.3MiB allocated; 9ms collecting garbage
Counts
89 → 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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (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 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(/.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 (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.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 (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (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))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #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 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 #s(approx (sin b) b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a 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 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos 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))) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (/ 1 (pow (sin a) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (*.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 (sin.f64 a) (sin.f64 (+.f64 b (PI.f64))) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) b (/.f64 (PI.f64) #s(literal 2 binary64)))) (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) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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))))))
Outputs
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))
Calls

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

regimes93.0ms (1.8%)

Memory
-13.0MiB live, 131.7MiB allocated; 21ms collecting garbage
Counts
84 → 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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (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 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(/.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 (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.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 (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (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))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #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 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 #s(approx (sin b) b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a 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 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos 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))) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (/ 1 (pow (sin a) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (*.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))))
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:

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

Compiled 12 to 17 computations (-41.7% saved)

regimes82.0ms (1.6%)

Memory
36.9MiB live, 130.4MiB allocated; 3ms collecting garbage
Counts
82 → 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) (tan (PI))) (- 1 (* (tan b) (tan (PI))))) #s(literal 0 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (*.f64 b r) a r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 b r) (*.f64 a r)) b r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 b (PI.f64)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 (+.f64 (PI.f64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (/ (* r (pow (sqrt (sin b)) 2)) (- (* (cos b) (cos a)) (* (sin b) (sin a)))) (*.f64 b (/.f64 r (cos.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r #s(approx (sin b) b)) (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 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (*.f64 a r) (pow.f64 (tan.f64 b) #s(literal 2 binary64)))))
(/.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 (fabs.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (neg.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #s(literal 1 binary64)))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 b)) a))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 #s(approx (+ a b) b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 a b) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 r (sin.f64 b)) (sin.f64 (+.f64 (+.f64 b (/.f64 (PI.f64) #s(literal 2 binary64))) a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))))
(/.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 (sin.f64 b)) (sin.f64 #s(approx (+ (neg (+ a b)) (/ (PI) 2)) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b) a) #s(literal -1 binary64) #s(literal 1 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 a (pow.f64 (tan.f64 b) #s(literal 2 binary64)) (tan.f64 b)) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (fma.f64 a (*.f64 r (*.f64 (tan.f64 b) (tan.f64 b))) (*.f64 r (tan.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 a) (sin.f64 b) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (neg.f64 b) (sin.f64 a) (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (- (* (cos b) (cos a)) (* (sin b) (/ 1 (pow (sin a) -1)))) (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))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (pow.f64 (sqrt.f64 (sin.f64 b)) #s(literal 2 binary64))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) #s(approx (+ (* a (* r (* (tan b) (tan b)))) (* r (tan b))) (*.f64 (fma.f64 (/.f64 r a) (tan.f64 b) (*.f64 (pow.f64 (tan.f64 b) #s(literal 2 binary64)) r)) a)))
(/.f64 (*.f64 r (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 b) #s(literal -1 binary64)))) (cos.f64 #s(approx (+ a b) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (tan.f64 (PI.f64))) #s(approx (- 1 (* (tan b) (tan (PI)))) #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 (*.f64 (*.f64 r (sqrt.f64 (sin.f64 b))) (sqrt.f64 (sin.f64 b))) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 #s(approx (* (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) #s(approx (* (cos a) (cos b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 (+.f64 (tan.f64 b) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 b) (tan.f64 (PI.f64)))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 #s(approx (sin b) b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 #s(approx (sin b) b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 #s(approx (sin b) b)) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 a) b) #s(literal -1/2 binary64)) (sin.f64 a)) b (cos.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 b) a) #s(literal -1/2 binary64)) (sin.f64 b)) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (cos b) (cos a)) (* (neg (sin b)) (sin a))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (+ (* (sin a) (neg (sin b))) (* (cos a) (cos b))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a) (cos.f64 b) (neg.f64 (sin.f64 b))) a (cos.f64 b))))
(/.f64 (*.f64 r (*.f64 (pow.f64 (sin.f64 b) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 b)))) (cos.f64 (+.f64 a 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 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos a) (fma.f64 (*.f64 a a) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 b))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/6 binary64) #s(literal 1 binary64)) b))) (-.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (sin.f64 a) (neg.f64 (sin.f64 b)) (*.f64 #s(approx (cos 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))) (cos.f64 b))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (/ 1 (pow (sin a) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
(/.f64 (*.f64 r (sin.f64 b)) (-.f64 (*.f64 (cos.f64 b) #s(approx (cos a) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 a a) #s(literal 1/24 binary64)) (*.f64 a a)) #s(literal 1/2 binary64)) (*.f64 a a) #s(literal 1 binary64)))) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (sin.f64 a))))
(/.f64 (*.f64 r #s(approx (pow (sqrt (sin b)) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 b b) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (-.f64 (*.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) (cos.f64 a)) (*.f64 (sin.f64 b) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (sin.f64 b)) (fma.f64 (cos.f64 b) (cos.f64 a) (*.f64 (neg.f64 (sin.f64 b)) #s(approx (sin a) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 a a) #s(literal 1/120 binary64)) (*.f64 a a)) #s(literal 1/6 binary64)) (*.f64 a a) #s(literal 1 binary64)) a)))))
(/.f64 (*.f64 r (*.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)) (-.f64 (*.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
Calls

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

regimes78.0ms (1.5%)

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

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

regimes37.0ms (0.7%)

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

4 calls:

17.0ms
a
6.0ms
b
6.0ms
r
6.0ms
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
Results
AccuracySegmentsBranch
59.0%1(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
62.3%3r
75.1%3a
74.8%3b
Compiler

Compiled 12 to 17 computations (-41.7% saved)

regimes10.0ms (0.2%)

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

2 calls:

5.0ms
a
4.0ms
b
Results
AccuracySegmentsBranch
74.8%3b
72.6%3a
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes12.0ms (0.2%)

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

11.0ms
b
Results
AccuracySegmentsBranch
74.8%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes8.0ms (0.2%)

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

3 calls:

2.0ms
b
2.0ms
a
2.0ms
r
Results
AccuracySegmentsBranch
59.0%1r
59.0%1a
59.0%1b
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes7.0ms (0.1%)

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

Total -14.2b remaining (-33.4%)

Threshold costs -14.2b (-33.4%)

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

4 calls:

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

Compiled 12 to 17 computations (-41.7% saved)

bsearch59.0ms (1.1%)

Memory
-13.0MiB live, 40.1MiB allocated; 18ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
35.0ms
1.2895269431467216
3508.530678242397
21.0ms
-1.6232216517433658e-5
-2.390227705694104e-14
Samples
37.0ms140×1valid
9.0ms132×0valid
Compiler

Compiled 437 to 388 computations (11.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 22.0ms
ival-cos: 8.0ms (35.6% of total)
ival-sin: 7.0ms (31.2% of total)
adjust: 3.0ms (13.4% of total)
ival-div!: 2.0ms (8.9% of total)
ival-mult!: 2.0ms (8.9% of total)
ival-add!: 1.0ms (4.5% of total)

bsearch47.0ms (0.9%)

Memory
-5.7MiB live, 41.4MiB allocated; 5ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
23.0ms
1.1201940417311884
1311.9273972599265
21.0ms
-437656.62986762734
-323.07628697041696
Samples
20.0ms122×1valid
14.0ms134×0valid
Compiler

Compiled 620 to 494 computations (20.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-cos: 11.0ms (41.7% of total)
ival-sin: 9.0ms (34.1% of total)
adjust: 2.0ms (7.6% of total)
ival-mult!: 2.0ms (7.6% of total)
ival-add!: 1.0ms (3.8% of total)
ival-div!: 1.0ms (3.8% of total)

bsearch2.0ms (0%)

Memory
2.1MiB live, 2.1MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
1.1201940417311884
1311.9273972599265
1.0ms
-437656.62986762734
-323.07628697041696
Compiler

Compiled 492 to 414 computations (15.9% saved)

simplify28.0ms (0.6%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
079238
1117238
2159238
3216238
4293238
5790238
Stop Event
1×node limit
Calls
Call 1
Inputs
(*.f64 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
(/.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)) (-.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) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 a #s(literal -944473296573929/147573952589676412928 binary64)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a))) (if (<=.f64 a #s(literal 5854679515581645/4503599627370496 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))))
(if (<=.f64 b #s(literal -330 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 2589569785738035/2251799813685248 binary64)) (/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (<=.f64 b #s(literal -330 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 2589569785738035/2251799813685248 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 r (/.f64 (sin.f64 b) (fma.f64 (cos.f64 a) (cos.f64 b) (*.f64 (neg.f64 (sin.f64 b)) (pow.f64 (sin.f64 a) #s(literal 1 binary64))))))
(/.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)) (-.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) (cos.f64 a)) (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) #s(approx (pow (sin a) -1) (/.f64 (fma.f64 (*.f64 a a) #s(literal 1/6 binary64) #s(literal 1 binary64)) a))))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(if (<=.f64 a #s(literal -944473296573929/147573952589676412928 binary64)) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a))) (if (<=.f64 a #s(literal 5854679515581645/4503599627370496 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a)))))
(if (or (<=.f64 a #s(literal -944473296573929/147573952589676412928 binary64)) (not (<=.f64 a #s(literal 5854679515581645/4503599627370496 binary64)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) a))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))))
(if (<=.f64 b #s(literal -330 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 2589569785738035/2251799813685248 binary64)) (/.f64 (*.f64 r #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))) (cos.f64 (+.f64 a b))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b)))))
(if (or (<=.f64 b #s(literal -330 binary64)) (not (<=.f64 b #s(literal 2589569785738035/2251799813685248 binary64)))) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (/.f64 (*.f64 r #s(approx (sin b) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 b b)) #s(literal 1/6 binary64)) (*.f64 b b) #s(literal 1 binary64)) b))) (cos.f64 (+.f64 a b))))
(if (<=.f64 b #s(literal -330 binary64)) #s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (tan.f64 b))) (if (<=.f64 b #s(literal 2589569785738035/2251799813685248 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 -330 binary64)) (not (<=.f64 b #s(literal 2589569785738035/2251799813685248 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)))

derivations224.0ms (4.4%)

Memory
-7.6MiB live, 131.8MiB allocated; 13ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 238 to 80 computations (66.4% saved)

preprocess76.0ms (1.5%)

Memory
-3.7MiB live, 87.7MiB allocated; 9ms collecting garbage
Remove

(negabs r)

Compiler

Compiled 970 to 508 computations (47.6% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...