Metrics for rsin A (should all be same)

start0.0ms (0.0%)

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

analyze742.0ms (16.8%)

Memory

-86.1MiB live, 497.9MiB allocated; 813ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	0
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	1
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	2
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	3
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	4
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	5
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	6
12.5%	12.5%	87.4%	0.1%	0.0%	0.0%	0.0%	7
12.5%	12.5%	87.4%	0.1%	0.0%	0.0%	0.0%	8
18.8%	18.7%	81.1%	0.1%	0.0%	0.0%	0.0%	9
21.9%	21.8%	78.0%	0.1%	0.0%	0.0%	0.0%	10
21.9%	21.8%	78.0%	0.1%	0.0%	0.0%	0.0%	11
23.4%	23.4%	76.5%	0.1%	0.0%	0.0%	0.0%	12

Compiler

Compiled 11 to 10 computations (9.1% saved)

sample1.4s (32.6%)

Memory

11.5MiB live, 2 618.4MiB allocated; 263ms collecting garbage

Samples

994.0ms	5 959×	1	valid
137.0ms	2 297×	0	valid

Precisions

Click to see histograms. Total time spent on operations: 806.0ms

ival-cos: 294.0ms (36.5% of total)

ival-sin: 213.0ms (26.4% of total)

adjust: 132.0ms (16.4% of total)

ival-div!: 60.0ms (7.4% of total)

ival-mult!: 55.0ms (6.8% of total)

ival-add!: 53.0ms (6.6% of total)

Bogosity

preprocess28.0ms (0.6%)

Memory

33.1MiB live, 33.1MiB allocated; 0ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	38	95
1	178	93
2	798	93

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	75.3%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Symmetry

(negabs r)

Compiler

Compiled 18 to 16 computations (11.1% saved)

sample0.0ms (0.0%)

Memory

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

Calls

Call 1

Inputs

Outputs

series43.0ms (1.0%)

Memory

-8.1MiB live, 84.2MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	220	900

Stop Event

1×	iter-limit

Counts

8 → 39

Calls

Call 1

Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
a
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Outputs
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx a a)
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (*.f64 b r))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (cos (+ a b)) (cos.f64 a))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))

Calls

9 calls:

Time	Variable	Point
9.0ms	r	0
2.0ms	b	-inf
2.0ms	r	inf
2.0ms	r	-inf
2.0ms	a	0

rewrite156.0ms (3.5%)

Memory

7.8MiB live, 344.2MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	8	25
0	13	25
1	58	25
2	257	25
3	1574	25
0	4478	25

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

8 → 104

Calls

Call 1

Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
a
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))

Outputs
r
b
(sin.f64 b)
(*.f64 (neg.f64 (neg.f64 r)) (sin.f64 b))
(*.f64 (neg.f64 (neg.f64 (sin.f64 b))) r)
(*.f64 (neg.f64 r) (neg.f64 (sin.f64 b)))
(*.f64 (neg.f64 (sin.f64 b)) (neg.f64 r))
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))
(.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))
(.f64 (sin.f64 b) (.f64 r #s(literal 1 binary64)))
(*.f64 (sin.f64 b) (neg.f64 (neg.f64 r)))
(*.f64 (sin.f64 b) r)
(.f64 r (.f64 (sin.f64 b) #s(literal 1 binary64)))
(*.f64 r (neg.f64 (neg.f64 (sin.f64 b))))
(*.f64 r (sin.f64 b))
(neg.f64 (*.f64 (neg.f64 r) (sin.f64 b)))
a
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b)) b)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) a)) a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a)
(/.f64 (-.f64 (.f64 b b) (.f64 (neg.f64 a) (neg.f64 a))) (+.f64 b (neg.f64 a)))
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (.f64 b b) (+.f64 (.f64 (neg.f64 a) (neg.f64 a)) (*.f64 b (neg.f64 a)))))
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (.f64 a a) (.f64 (neg.f64 b) (neg.f64 b))) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 a a) (*.f64 b a))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 a a) (+.f64 (.f64 (neg.f64 b) (neg.f64 b)) (*.f64 a (neg.f64 b)))))
(/.f64 (-.f64 (.f64 a a) (.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (.f64 a a) (-.f64 (.f64 b b) (*.f64 a b))))
(neg.f64 (neg.f64 (+.f64 a b)))
(-.f64 a (neg.f64 b))
(-.f64 b (neg.f64 a))
(+.f64 (neg.f64 (neg.f64 a)) b)
(+.f64 a b)
(+.f64 b (neg.f64 (neg.f64 a)))
(+.f64 b a)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)))) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))) (.f64 (cos.f64 b) (cos.f64 a)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 a b)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))) (-.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))))
(/.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 (.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 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))) (cos.f64 (-.f64 a b)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (neg.f64 (-.f64 (+.f64 a b) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 a b))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 a b)) (PI.f64)))
(sin.f64 (+.f64 (-.f64 (+.f64 a b) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64))) (PI.f64)))
(sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (-.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (-.f64 (+.f64 a b) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(-.f64 (.f64 (sin.f64 a) (cos.f64 (-.f64 (neg.f64 b) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 a) (sin.f64 (-.f64 (neg.f64 b) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 a b))) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(-.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (neg.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 a))))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 a b)))))
(cos.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 a b)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (+.f64 a b) (-.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64))) (.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (-.f64 (neg.f64 b) (-.f64 a (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 a b)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) (+.f64 a b)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(+.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (cos.f64 b) (cos.f64 a)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(+.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (neg.f64 r) (/.f64 (sin.f64 b) (neg.f64 (cos.f64 (+.f64 a b)))))
(.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))) (.f64 (neg.f64 r) (sin.f64 b)))
(.f64 (neg.f64 (sin.f64 b)) (.f64 r (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (neg.f64 (sin.f64 b)) (/.f64 r (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b))))
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (sin.f64 b) (.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (.f64 (neg.f64 r) (sin.f64 b)) #s(literal 1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (*.f64 (neg.f64 r) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))))

eval16.0ms (0.4%)

Memory: -6.2MiB live, 39.6MiB allocated; 3ms collecting garbage
Compiler: Compiled 2 723 to 615 computations (77.4% saved)

prune19.0ms (0.4%)

Memory

2.7MiB live, 49.8MiB allocated; 2ms collecting garbage

Pruning

25 alts after pruning (25 fresh and 0 done)

	Pruned	Kept	Total
New	111	25	136
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	112	25	137

Accuracy

99.8%

Counts

137 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
	75.2%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
	41.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
	40.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
	49.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
	61.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
	62.9%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
▶	60.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b))))))
	60.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
	49.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 b (cos.f64 a))) (sin.f64 a))))))
	50.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
	53.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
▶	48.8%	(/.f64 (.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))) (cos.f64 (+.f64 a b)))
	48.8%	(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
	74.9%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
	75.3%	(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
	75.3%	(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
▶	75.3%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
	75.3%	(.f64 (sin.f64 b) (.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
	75.2%	(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
▶	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
	60.8%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))

Compiler

Compiled 1 024 to 666 computations (35.0% saved)

sample0.0ms (0.0%)

Memory

0.7MiB live, 0.7MiB allocated; 0ms collecting garbage

Calls

Call 1

Inputs
1
-1/6
2
-1/2

Outputs
#s(literal 1 binary64)
#s(literal -6004799503160661/36028797018963968 binary64)
#s(literal 2 binary64)
#s(literal -1/2 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 6 to 6 computations (0.0% saved)

Precisions

Click to see histograms. Total time spent on operations: 0.0ms

adjust: 0.0ms (0.0% of total)

series76.0ms (1.7%)

Memory

2.2MiB live, 192.0MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	604	2945

Stop Event

1×	iter-limit

Counts

38 → 120

Calls

Call 1

Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
(cos.f64 b)
a
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 b r)
(/.f64 (*.f64 b r) (cos.f64 a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(literal 1 binary64)
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
#s(literal -1/6 binary64)
#s(literal 2 binary64)
(pow.f64 b #s(literal 2 binary64))
(*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
(.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
(.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))))
(/.f64 (.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))) (cos.f64 (+.f64 a b)))
#s(literal -1/2 binary64)
(*.f64 a (cos.f64 b))
(.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b)))
(-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b))
(.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))
(+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b))))))

Outputs
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (* b r) (cos a)) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx a a)
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))) (.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 b)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* b r) (cos a)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 b r)))
#s(approx (/ (* b r) (cos a)) (+.f64 (.f64 b r) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r))))) (.f64 #s(literal -1/2 binary64) (.f64 b r))))))
#s(approx (/ (* b r) (cos a)) (+.f64 (.f64 b r) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 b r)) (+.f64 (.f64 #s(literal 1/48 binary64) (.f64 b r)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r)))))))) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r))))) (.f64 #s(literal -1/2 binary64) (.f64 b r))))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (/.f64 (*.f64 a (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (cos.f64 b))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (* a (cos b)) (*.f64 a (cos.f64 b)))
#s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (*.f64 #s(literal -1 binary64) (sin.f64 b)))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b)))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 (cos.f64 b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b)))))))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (cos.f64 b) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (sin.f64 b) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 b)) (/.f64 (sin.f64 b) a)))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 b) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 b) a))) a)) (.f64 #s(literal -1/2 binary64) (cos.f64 b)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 a)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (pow b 2) (pow.f64 b #s(literal 2 binary64)))
#s(approx (* -1/6 (pow b 2)) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/6 (pow b 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (* a (cos b)) (+.f64 a (.f64 #s(literal -1/2 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* a (cos b)) (+.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 #s(literal 1/24 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* a (cos b)) (+.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))) (.f64 #s(literal 1/24 binary64) a)))))))
#s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (* -1/2 (* a (cos b))) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 #s(literal 1/4 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/2 (* a (cos b))) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) a)))))
#s(approx (* -1/2 (* a (cos b))) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/48 binary64) a) (.f64 #s(literal 1/1440 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal -1/2 binary64) a)))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 b (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/4 binary64) a))) #s(literal 1 binary64)))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 a b)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 a b)) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (.f64 a b)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 a b)) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (+ 1 (* -1/6 (pow b 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (* b (+ 1 (* -1/6 (pow b 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 3 binary64))))
#s(approx (* b (+ 1 (* -1/6 (pow b 2)))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* b (+ 1 (* -1/6 (pow b 2)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 b #s(literal 2 binary64)))))))

Calls

9 calls:

Time	Variable	Point
7.0ms	b	0
7.0ms	a	0
6.0ms	b	-inf
6.0ms	r	inf
6.0ms	a	inf

rewrite161.0ms (3.6%)

Memory

0.6MiB live, 284.7MiB allocated; 29ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	43	265
0	73	249
1	288	249
2	1277	241
0	4117	241

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

38 → 458

Calls

Call 1

Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
(cos.f64 b)
a
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(*.f64 b r)
(/.f64 (*.f64 b r) (cos.f64 a))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(literal 1 binary64)
(+.f64 a b)
(cos.f64 (+.f64 a b))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))
(*.f64 (sin.f64 b) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
#s(literal -1/6 binary64)
#s(literal 2 binary64)
(pow.f64 b #s(literal 2 binary64))
(*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))
(.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
(.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))))
(/.f64 (.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))) (cos.f64 (+.f64 a b)))
#s(literal -1/2 binary64)
(*.f64 a (cos.f64 b))
(.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b)))
(-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b))
(.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))
(+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b))))))

Outputs
r
b
(sin.f64 b)
(.f64 (.f64 #s(literal 1 binary64) r) (sin.f64 b))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) r)
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))
(.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(sin.f64 (+.f64 (neg.f64 (neg.f64 b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
(-.f64 (.f64 (sin.f64 b) #s(literal 0 binary64)) (.f64 (cos.f64 b) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 b))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 b))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 (fabs.f64 b))
(cos.f64 b)
(+.f64 (.f64 (neg.f64 (sin.f64 b)) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 b)) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 b)) (.f64 #s(literal 0 binary64) (sin.f64 b)))
(+.f64 (.f64 (sin.f64 b) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
a
(sin.f64 (+.f64 (neg.f64 (neg.f64 a)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 a)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(-.f64 (.f64 (sin.f64 a) #s(literal 0 binary64)) (.f64 (cos.f64 a) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 a))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 a))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 (fabs.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 (fabs.f64 a))
(cos.f64 a)
(+.f64 (.f64 (sin.f64 (fabs.f64 a)) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 #s(literal 0 binary64) (sin.f64 a)))
(+.f64 (.f64 (neg.f64 (sin.f64 a)) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 a) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
(*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (neg.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 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) b)) (cos.f64 (-.f64 (fabs.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 b))) (cos.f64 (-.f64 a (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) a)) (cos.f64 (-.f64 (fabs.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 a))) (cos.f64 (-.f64 b (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(+.f64 (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)))
(sin.f64 a)
(*.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(-.f64 (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))) (.f64 (cos.f64 a) (cos.f64 b)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))) (.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.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 b a)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.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 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (.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 (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 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (.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))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (neg.f64 a) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 a b))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b)))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))
(sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a)))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))
(-.f64 (.f64 (sin.f64 a) (cos.f64 (-.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 a) (sin.f64 (-.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (neg.f64 (neg.f64 (sin.f64 b)))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 a))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (-.f64 (neg.f64 a) b)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 a b)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 (+.f64 a b)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 a b)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 a b) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 a) b))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(+.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 b r)
(*.f64 r b)
(*.f64 (/.f64 r (cos.f64 a)) b)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r))
(.f64 (.f64 (neg.f64 b) r) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 a))))
(.f64 (.f64 b r) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 b (/.f64 r (cos.f64 a)))
(.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a))))
(*.f64 r (/.f64 b (cos.f64 a)))
(/.f64 (.f64 (.f64 b r) #s(literal 1 binary64)) (cos.f64 a))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) r)) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 a)) (*.f64 (neg.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
(/.f64 (*.f64 b r) (cos.f64 a))
(neg.f64 (/.f64 (*.f64 b r) (neg.f64 (cos.f64 a))))
(neg.f64 (/.f64 (*.f64 (neg.f64 b) r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(literal 1 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 b) a)) a)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a)
(/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 b a))
(/.f64 (+.f64 (.f64 (.f64 b b) b) (pow.f64 a #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 a a) (*.f64 b a))))
(/.f64 (-.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 a a) (+.f64 (.f64 b b) (*.f64 a (neg.f64 b)))))
(/.f64 (-.f64 (.f64 a a) (.f64 b b)) (-.f64 a b))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (.f64 b b) b)) (+.f64 (.f64 a a) (-.f64 (.f64 b b) (*.f64 a b))))
(neg.f64 (neg.f64 (+.f64 a b)))
(-.f64 a (neg.f64 b))
(-.f64 b (neg.f64 a))
(+.f64 a (neg.f64 (neg.f64 b)))
(+.f64 a b)
(+.f64 b a)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))) (.f64 (cos.f64 a) (cos.f64 b)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))) (.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.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 b a)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.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 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (.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 (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 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (.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))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (neg.f64 a) b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 a b))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b)))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))
(sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a)))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) a))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)))
(-.f64 (.f64 (sin.f64 a) (cos.f64 (-.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 a) (sin.f64 (-.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (neg.f64 (neg.f64 (sin.f64 b)))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 a))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b)))
(cos.f64 (neg.f64 (-.f64 (neg.f64 a) b)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 a b)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 a b)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 (+.f64 a b)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 a b)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 a b) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 a) b))
(cos.f64 (neg.f64 (+.f64 a b)))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (.f64 (sin.f64 (neg.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 a b))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 a b))))
(+.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))
(*.f64 (pow.f64 (cos.f64 (+.f64 a b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (+.f64 a b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(pow.f64 (cos.f64 (+.f64 a b)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1 binary64) r) (sin.f64 b))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) r)
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))
(.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
#s(literal -1/6 binary64)
#s(literal 2 binary64)
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 b b))
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (pow.f64 b #s(literal 1 binary64)) b)
(*.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)))
(*.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)))
(*.f64 (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(.f64 (.f64 b b) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 b b)
(pow.f64 (neg.f64 b) #s(literal 2 binary64))
(pow.f64 (fabs.f64 b) #s(literal 2 binary64))
(pow.f64 b #s(literal 2 binary64))
(/.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal -1 binary64)))
(sqrt.f64 (.f64 (.f64 b b) (*.f64 b b)))
(fabs.f64 (*.f64 (neg.f64 b) b))
(fabs.f64 (*.f64 b (neg.f64 b)))
(fabs.f64 (*.f64 b b))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal -1/6 binary64) b) b)
(.f64 (.f64 b b) #s(literal -1/6 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 b b))
(.f64 b (.f64 b #s(literal -1/6 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 b b) #s(literal -1/6 binary64)))) (.f64 (*.f64 b b) #s(literal -1/6 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/6 binary64) (*.f64 b b)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) (.f64 (.f64 b b) #s(literal -1/6 binary64))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(literal 1/6 binary64) (.f64 b b)) (.f64 #s(literal 1/6 binary64) (.f64 b b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 b b))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) (.f64 (.f64 b b) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 b b)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (.f64 b b)) (.f64 #s(literal 1/6 binary64) (.f64 b b))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 b b))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) (.f64 (.f64 b b) #s(literal -1/6 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 b b) #s(literal -1/6 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) (.f64 (.f64 b b) #s(literal -1/6 binary64))) (.f64 #s(literal 1 binary64) (.f64 (*.f64 b b) #s(literal -1/6 binary64))))))
(neg.f64 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 b b)) #s(literal 1 binary64)))
(-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 b b)))
(+.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 #s(literal 1/6 binary64) (.f64 b b))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 b b) #s(literal -1/6 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 b b) b) #s(literal -1/6 binary64)) b)) b)
(.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)
(.f64 b (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)))
(/.f64 (-.f64 (.f64 b b) (.f64 (.f64 (.f64 (.f64 b b) b) #s(literal -1/6 binary64)) (.f64 (.f64 (.f64 b b) b) #s(literal -1/6 binary64)))) (-.f64 b (.f64 (.f64 (*.f64 b b) b) #s(literal -1/6 binary64))))
(/.f64 (+.f64 (.f64 (.f64 b b) b) (pow.f64 (.f64 (.f64 (.f64 b b) b) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 (.f64 (.f64 (.f64 b b) b) #s(literal -1/6 binary64)) (.f64 (.f64 (.f64 b b) b) #s(literal -1/6 binary64))) (.f64 b (.f64 (.f64 (*.f64 b b) b) #s(literal -1/6 binary64))))))
(-.f64 b (.f64 (neg.f64 b) (.f64 (*.f64 b b) #s(literal -1/6 binary64))))
(-.f64 b (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 b b)) b))
(-.f64 b (neg.f64 (.f64 (.f64 (*.f64 b b) b) #s(literal -1/6 binary64))))
(+.f64 (.f64 (.f64 (*.f64 b b) b) #s(literal -1/6 binary64)) b)
(+.f64 b (.f64 (.f64 (*.f64 b b) b) #s(literal -1/6 binary64)))
#s(approx (sin b) (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r)
(.f64 r #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)))
(.f64 (.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(.f64 (.f64 (neg.f64 r) #s(approx (sin b) (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r))
(.f64 r (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (*.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (.f64 (neg.f64 r) #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 (neg.f64 r) #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (.f64 (neg.f64 r) #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r)))
(neg.f64 (/.f64 (.f64 (neg.f64 r) #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b))) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (neg.f64 (cos.f64 (+.f64 a b)))))
#s(literal -1/2 binary64)
(*.f64 a (cos.f64 b))
(*.f64 (cos.f64 b) a)
(.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) a)
(.f64 (.f64 #s(literal -1/2 binary64) a) (cos.f64 b))
(.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))
(.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b)))
(.f64 a (.f64 (cos.f64 b) #s(literal -1/2 binary64)))
(.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) a))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sin.f64 b)) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)))) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)))) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 b)))) (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) (-.f64 (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 b))) (.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 b))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) (.f64 (sin.f64 b) (sin.f64 b))) (+.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) (+.f64 (.f64 (sin.f64 b) (sin.f64 b)) (.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)))))
(neg.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))))
(-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (neg.f64 (neg.f64 (sin.f64 b))))
(-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b))
(+.f64 (neg.f64 (sin.f64 b)) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)))
(+.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 b)))
(.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a)
(.f64 a (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)))
(neg.f64 (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))
(+.f64 (.f64 a (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) (.f64 a (neg.f64 (sin.f64 b))))
(+.f64 (.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) a) (.f64 (neg.f64 (sin.f64 b)) a))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a))) (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a) (cos.f64 b))) (cos.f64 b))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b))) (cos.f64 b))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a)) (.f64 (cos.f64 b) (cos.f64 b))) (-.f64 (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))
(/.f64 (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))) (+.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a)) (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 b) (cos.f64 b)) (+.f64 (.f64 (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)) (.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
(/.f64 (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a))) (-.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a)))
(/.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 b) (cos.f64 b)) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (.f64 (-.f64 (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a)) (.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a)))))
(neg.f64 (-.f64 (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a) (cos.f64 b)))
(-.f64 (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (neg.f64 (cos.f64 b)))
(-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))
(+.f64 (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a) (cos.f64 b))
(+.f64 (cos.f64 b) (.f64 (neg.f64 (neg.f64 a)) (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b))))
(+.f64 (cos.f64 b) (.f64 (-.f64 (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64)) (sin.f64 b)) a))
#s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))
(.f64 (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))) r)
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))) (*.f64 (sin.f64 b) r))
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (*.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
(/.f64 (neg.f64 (.f64 (neg.f64 r) (sin.f64 b))) (neg.f64 (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))))))
(/.f64 (.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))) (.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))) (.f64 (sin.f64 b) r)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))))
(neg.f64 (/.f64 (.f64 (sin.f64 b) r) (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a))))))
(neg.f64 (/.f64 (.f64 (neg.f64 r) (sin.f64 b)) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))

eval100.0ms (2.3%)

Memory: -24.2MiB live, 138.4MiB allocated; 56ms collecting garbage
Compiler: Compiled 15 403 to 3 023 computations (80.4% saved)

prune39.0ms (0.9%)

Memory

-11.1MiB live, 128.6MiB allocated; 6ms collecting garbage

Pruning

40 alts after pruning (38 fresh and 2 done)

	Pruned	Kept	Total
New	540	23	563
Fresh	5	15	20
Picked	5	0	5
Done	-2	2	0
Total	548	40	588

Accuracy

99.8%

Counts

588 → 40

Alt Table

Click to see full alt table

Status	Accuracy	Program
	48.8%	(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
	75.2%	(/.f64 (.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
	65.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
	64.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
▶	99.5%	(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
	41.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
	40.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
	49.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
	61.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
	62.9%	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
▶	60.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))))
	49.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
	50.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a))))))
	60.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))
	53.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
	48.8%	(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
	74.9%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
	75.3%	(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
	48.8%	(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
	75.3%	(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
▶	62.8%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
	75.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
	60.2%	(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
	75.2%	(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
	51.8%	(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
	53.2%	(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
	48.8%	(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	37.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
✓	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
	36.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
▶	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
▶	48.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))

Compiler

Compiled 1 582 to 1 104 computations (30.2% saved)

sample0.0ms (0.0%)

Memory

1.7MiB live, 1.7MiB allocated; 0ms collecting garbage

Calls

Call 1

Inputs
1
-1

Outputs
#s(literal 1 binary64)
#s(literal -1 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 4 to 4 computations (0.0% saved)

Precisions

Click to see histograms. Total time spent on operations: 0.0ms

adjust: 0.0ms (0.0% of total)

series105.0ms (2.4%)

Memory

28.3MiB live, 313.3MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	740	4036

Stop Event

1×	iter-limit

Counts

33 → 125

Calls

Call 1

Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
#s(literal 1 binary64)
a
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(cos.f64 b)
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 b r)
#s(approx (cos a) #s(literal 1 binary64))
(/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (cos.f64 a) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (+ a b) b)
(cos.f64 #s(approx (+ a b) b))
(/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (sin.f64 b) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
#s(literal -1 binary64)
(*.f64 a (sin.f64 b))
(.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))
(+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))))

Outputs
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (/.f64 (.f64 r (sin.f64 b)) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (* b r) (cos a)) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (/ (cos a) (* b r)) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (- (* (cos b) (cos a)) (* (sin a) (sin b)))) (/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
#s(approx a a)
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 b)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))))))))
#s(approx (* (sin a) (sin b)) (.f64 a (+.f64 (sin.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 b)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b))) (*.f64 #s(literal 1/120 binary64) (sin.f64 b)))))))))
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (cos.f64 b))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 b) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))) (.f64 #s(literal 1/24 binary64) (cos.f64 b))))))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (/.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (.f64 a (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (.f64 a (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (.f64 a (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (sin.f64 b)) (cos.f64 b)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (.f64 a (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (.f64 a (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b)))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 b)) (.f64 (cos.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))))))))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 b)) (.f64 (cos.f64 b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (* b r) (cos a)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 b r)))
#s(approx (/ (* b r) (cos a)) (+.f64 (.f64 b r) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r))))) (.f64 #s(literal -1/2 binary64) (.f64 b r))))))
#s(approx (/ (* b r) (cos a)) (+.f64 (.f64 b r) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 b r)) (+.f64 (.f64 #s(literal 1/48 binary64) (.f64 b r)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r)))))))) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r))))) (.f64 #s(literal -1/2 binary64) (.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (cos a) (* b r)) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
#s(approx (/ (cos a) (* b r)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 b r))))) (/.f64 #s(literal 1 binary64) (.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (.f64 b r))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 b r))))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (/.f64 (*.f64 a (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (cos.f64 b))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (* -1 (* a (sin b))) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))
#s(approx (sin a) (sin.f64 a))
#s(approx (* (sin a) (sin b)) (*.f64 (sin.f64 a) (sin.f64 b)))
#s(approx (cos a) (cos.f64 a))
#s(approx (* (cos b) (cos a)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))))))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
#s(approx (+ (cos b) (* -1 (* a (sin b)))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (/.f64 (cos.f64 b) a))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (+ (cos b) (* -1 (* a (sin b)))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (sin.f64 b) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 b) a))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a)))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 a)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))))))))
#s(approx (* (sin a) (sin b)) (.f64 b (+.f64 (sin.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 a)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a))) (*.f64 #s(literal 1/120 binary64) (sin.f64 a)))))))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))))
#s(approx (* (cos b) (cos a)) (+.f64 (cos.f64 a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (.f64 #s(literal 1/24 binary64) (cos.f64 a))))))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (/.f64 (*.f64 b (sin.f64 a)) (cos.f64 a)))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (/ (* (sin a) (sin b)) (* (cos b) (cos a))) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (sin.f64 a)) (cos.f64 a)))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (.f64 b (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (+.f64 #s(literal 1 binary64) (.f64 b (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 a) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 a)) (.f64 #s(literal -1/2 binary64) (.f64 b (cos.f64 a)))))))
#s(approx (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a))) (+.f64 (cos.f64 a) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 a)) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 b (.f64 (cos.f64 a) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))))))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (* (- 1 (/ (* (sin a) (sin b)) (* (cos b) (cos a)))) (* (cos b) (cos a)))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 r (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 a) (cos.f64 a)))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (cos.f64 a)))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (* a (sin b)) (*.f64 a b))
#s(approx (* a (sin b)) (.f64 b (+.f64 a (.f64 #s(literal -1/6 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* a (sin b)) (.f64 b (+.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) a) (.f64 #s(literal 1/120 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (* a (sin b)) (.f64 b (+.f64 a (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) a))))))))
#s(approx (* -1 (* a (sin b))) (.f64 #s(literal -1 binary64) (.f64 a b)))
#s(approx (* -1 (* a (sin b))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 #s(literal 1/6 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1 (* a (sin b))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/120 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) a))))))
#s(approx (* -1 (* a (sin b))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/120 binary64) a) (.f64 #s(literal 1/5040 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))))))))))
#s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))
#s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))
#s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (-.f64 (.f64 #s(literal 1/6 binary64) (*.f64 a b)) #s(literal 1/2 binary64)))))))
#s(approx (sin b) (sin.f64 b))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))

Calls

9 calls:

Time	Variable	Point
17.0ms	r	0
12.0ms	b	-inf
12.0ms	r	-inf
7.0ms	a	-inf
5.0ms	r	inf

rewrite163.0ms (3.7%)

Memory

-20.7MiB live, 318.1MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	44	261
0	67	209
1	289	201
2	1515	192
0	4059	192

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

33 → 448

Calls

Call 1

Inputs
r
b
(sin.f64 b)
(*.f64 r (sin.f64 b))
#s(literal 1 binary64)
a
(sin.f64 a)
(*.f64 (sin.f64 a) (sin.f64 b))
(cos.f64 b)
(cos.f64 a)
(*.f64 (cos.f64 b) (cos.f64 a))
(/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(*.f64 b r)
#s(approx (cos a) #s(literal 1 binary64))
(/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (cos.f64 a) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
#s(approx (+ a b) b)
(cos.f64 #s(approx (+ a b) b))
(/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (sin.f64 b) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
#s(literal -1 binary64)
(*.f64 a (sin.f64 b))
(.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))
(+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))))

Outputs
r
b
(sin.f64 b)
(.f64 (.f64 #s(literal 1 binary64) r) (sin.f64 b))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) r)
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))
(.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(neg.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)))
#s(literal 1 binary64)
a
(sin.f64 a)
(*.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 a) (sin.f64 b))
(*.f64 (sin.f64 b) (sin.f64 a))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))))
(-.f64 (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)))
(sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 b)))
(cos.f64 (fabs.f64 (fabs.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 (fabs.f64 b))
(cos.f64 b)
(+.f64 (.f64 (sin.f64 b) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (cos.f64 b) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 (fabs.f64 a)))
(cos.f64 (fabs.f64 (fabs.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 (fabs.f64 a))
(cos.f64 a)
(+.f64 (.f64 (sin.f64 a) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (cos.f64 a) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 b)) (cos.f64 a))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (cos.f64 b))
(*.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 1 binary64))
(*.f64 (cos.f64 a) (cos.f64 b))
(*.f64 (cos.f64 b) (cos.f64 a))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (neg.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 a)) b)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 a)) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (neg.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 a (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (neg.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 (fabs.f64 b)))) (cos.f64 (-.f64 a (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (neg.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 b)) a)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 b)) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (neg.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (neg.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 (fabs.f64 a)))) (cos.f64 (-.f64 b (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b)) (sin.f64 (+.f64 (+.f64 (fabs.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 (fabs.f64 b)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 (fabs.f64 b))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (neg.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a)) (sin.f64 (+.f64 (+.f64 (fabs.f64 b) (.f64 (PI.f64) #s(literal 1/2 binary64))) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (neg.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 a)))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 (fabs.f64 a))))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (neg.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 (neg.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (neg.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 a) b)) (cos.f64 (-.f64 (neg.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (neg.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) (fabs.f64 b))) (cos.f64 (-.f64 (fabs.f64 a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 a) b)) (cos.f64 (-.f64 (fabs.f64 a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a (fabs.f64 b))) (cos.f64 (-.f64 a (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 a b)) (cos.f64 (-.f64 (neg.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (neg.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 b) a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (neg.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) (fabs.f64 a))) (cos.f64 (-.f64 (fabs.f64 b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 b) a)) (cos.f64 (-.f64 (fabs.f64 b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 b (fabs.f64 a))) (cos.f64 (-.f64 b (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (neg.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 b))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) (fabs.f64 b)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) b)) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (neg.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 a))) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (fabs.f64 a)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) a)) (sin.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) a))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(neg.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) (cos.f64 b))))
(+.f64 (/.f64 (cos.f64 (+.f64 a b)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 b a)) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(*.f64 (tan.f64 a) (tan.f64 b))
(*.f64 (tan.f64 b) (tan.f64 a))
(.f64 (.f64 (sin.f64 a) (tan.f64 b)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (sin.f64 a) (sin.f64 b)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 a)) (/.f64 (sin.f64 a) (cos.f64 b)))
(*.f64 (/.f64 (sin.f64 a) (cos.f64 b)) (/.f64 (sin.f64 b) (cos.f64 a)))
(*.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (sin.f64 a))
(.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a))))
(.f64 (.f64 (sin.f64 a) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (sin.f64 a) (/.f64 (tan.f64 b) (cos.f64 a)))
(.f64 (sin.f64 b) (.f64 (sin.f64 a) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 a) (cos.f64 b)))))
(.f64 (sin.f64 b) (/.f64 (sin.f64 a) (.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (*.f64 (/.f64 (sin.f64 a) (cos.f64 b)) (sin.f64 b)) (cos.f64 a))
(/.f64 (.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 1 binary64)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (sin.f64 a) (/.f64 (sin.f64 b) (cos.f64 a))) (cos.f64 b))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 a) (cos.f64 b)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (sin.f64 a) (sin.f64 b)) (cos.f64 a)) (cos.f64 b))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (neg.f64 (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a))))
(/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 (sin.f64 a) (tan.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
(neg.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))))
(*.f64 (/.f64 (cos.f64 (+.f64 a b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (tan.f64 a) (tan.f64 b))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (cos.f64 (+.f64 a b)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 a) (cos.f64 b))))
(/.f64 (/.f64 (cos.f64 (+.f64 a b)) (cos.f64 a)) (cos.f64 b))
(/.f64 (/.f64 (cos.f64 (+.f64 a b)) (cos.f64 b)) (cos.f64 a))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 (sin.f64 a) (tan.f64 b))) (cos.f64 a))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a))) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (.f64 (tan.f64 a) (tan.f64 b))))) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (tan.f64 a) (tan.f64 b))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (.f64 (tan.f64 a) (tan.f64 b)))) (.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (tan.f64 a) (tan.f64 b)) (.f64 (tan.f64 a) (tan.f64 b)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (tan.f64 a) (tan.f64 b)) (.f64 (tan.f64 a) (tan.f64 b))) (.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (cos.f64 (+.f64 a b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(neg.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(-.f64 (/.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (tan.f64 a) (tan.f64 b)))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(+.f64 (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (tan.f64 a) (tan.f64 b))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (cos.f64 b))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a))
(.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(.f64 (.f64 (cos.f64 a) (cos.f64 b)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(.f64 (cos.f64 a) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)))
(.f64 (cos.f64 b) (.f64 (cos.f64 a) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (cos.f64 (+.f64 a b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (.f64 (cos.f64 (+.f64 a b)) (.f64 (cos.f64 a) (cos.f64 b))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))))) #s(literal 4 binary64))
(/.f64 (.f64 (cos.f64 (+.f64 a b)) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) (.f64 (*.f64 (cos.f64 a) (cos.f64 b)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b))) (cos.f64 (+.f64 a b))) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 a) (cos.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)))) (cos.f64 (-.f64 b a)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))) (+.f64 (.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))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 a b))))
(sin.f64 (+.f64 (-.f64 (neg.f64 b) a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 a (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b)))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (neg.f64 (sin.f64 a))) (sin.f64 b)))
(-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (.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 (fabs.f64 (+.f64 a b))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 a b))))
(cos.f64 (-.f64 (neg.f64 b) a))
(cos.f64 (fabs.f64 (+.f64 a b)))
(cos.f64 (+.f64 a b))
(+.f64 (.f64 (sin.f64 (+.f64 a b)) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (cos.f64 a) (cos.f64 b)))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (.f64 (cos.f64 a) (cos.f64 b)) (neg.f64 (.f64 (tan.f64 a) (tan.f64 b)))))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (.f64 (tan.f64 a) (tan.f64 b))) (.f64 (cos.f64 a) (cos.f64 b))))
(+.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))
(.f64 (/.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (+.f64 (cos.f64 (-.f64 b a)) (cos.f64 (+.f64 a b)))) #s(literal 2 binary64))
(.f64 (/.f64 (sin.f64 b) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
(.f64 (/.f64 r (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 a)))
(.f64 (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 r (*.f64 (cos.f64 a) (cos.f64 b))))
(.f64 (/.f64 r (.f64 (cos.f64 a) (cos.f64 b))) (/.f64 (sin.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 a) (cos.f64 b))))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 (tan.f64 b) (cos.f64 a)))
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 a b)))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (/.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)) (cos.f64 b))
(/.f64 (/.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 b)) (cos.f64 a))
(/.f64 (/.f64 (.f64 (sin.f64 b) r) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (cos.f64 a))
(/.f64 (/.f64 (.f64 (sin.f64 b) r) (.f64 (cos.f64 a) (cos.f64 b))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (*.f64 (cos.f64 a) (cos.f64 b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 a) (cos.f64 b)) (/.f64 (.f64 (sin.f64 b) r) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (*.f64 (sin.f64 b) r) (neg.f64 (cos.f64 (+.f64 a b)))))
(*.f64 b r)
(*.f64 r b)
#s(approx (cos a) #s(literal 1 binary64))
(*.f64 (/.f64 r #s(approx (cos a) #s(literal 1 binary64))) b)
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (.f64 b r))
(.f64 (.f64 (neg.f64 b) r) (/.f64 #s(literal 1 binary64) (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(.f64 (.f64 b r) (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(literal 1 binary64))))
(.f64 r (.f64 b (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64)))))
(*.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 b r) #s(literal 1 binary64)) #s(approx (cos a) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) r)) (neg.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (neg.f64 b) r)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r)))
(neg.f64 (/.f64 (*.f64 b r) (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 b) r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r #s(approx (cos a) #s(literal 1 binary64))) b))
(*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 b r)) (cos.f64 a))
(.f64 (neg.f64 (cos.f64 a)) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 b) r)))
(.f64 (cos.f64 a) (/.f64 #s(literal 1 binary64) (.f64 b r)))
(/.f64 (.f64 (cos.f64 a) #s(literal 1 binary64)) (.f64 b r))
(/.f64 (/.f64 (cos.f64 a) r) b)
(/.f64 (neg.f64 (/.f64 (cos.f64 a) b)) (neg.f64 r))
(/.f64 (neg.f64 (neg.f64 (cos.f64 a))) (neg.f64 (*.f64 (neg.f64 b) r)))
(/.f64 (/.f64 (cos.f64 a) b) r)
(/.f64 (neg.f64 (cos.f64 a)) (*.f64 (neg.f64 b) r))
(/.f64 (cos.f64 a) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (*.f64 b (/.f64 r (cos.f64 a))))
(neg.f64 (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) r) b)
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r)
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 a))) (.f64 (neg.f64 b) r))
(.f64 (pow.f64 (/.f64 (cos.f64 a) (.f64 b r)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 b r)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (.f64 (neg.f64 b) r))))
(.f64 (.f64 b (/.f64 r (cos.f64 a))) #s(literal 1 binary64))
(.f64 (.f64 b r) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(.f64 #s(literal 1 binary64) (.f64 b (/.f64 r (cos.f64 a))))
(*.f64 b (/.f64 r (cos.f64 a)))
(*.f64 r (/.f64 b (cos.f64 a)))
(pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 b r)) (cos.f64 a))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
(/.f64 (*.f64 (neg.f64 b) r) (neg.f64 (cos.f64 a)))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r)))
(/.f64 (*.f64 b r) (cos.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (cos.f64 a) (*.f64 b r)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) (*.f64 b r)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r)))
(/.f64 r (/.f64 (cos.f64 a) b))
(neg.f64 (.f64 #s(literal -1 binary64) (.f64 b (/.f64 r (cos.f64 a)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 (neg.f64 b) r))))
(exp.f64 (.f64 (log.f64 (/.f64 (cos.f64 a) (.f64 b r))) #s(literal -1 binary64)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 b (/.f64 r (cos.f64 a))))
#s(approx (+ a b) b)
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 (fabs.f64 #s(approx (+ a b) b))))
(cos.f64 (fabs.f64 (fabs.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 (fabs.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 1/2 binary64)))) (.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (cos.f64 #s(approx (+ a b) b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 #s(approx (+ a b) b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
(pow.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 #s(approx (+ a b) b))))
(neg.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1 binary64) r) (sin.f64 b))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) r)
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))
(.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(neg.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
(.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) (cos.f64 #s(approx (+ a b) b))) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))))
(.f64 r (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal -1 binary64)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
#s(literal -1 binary64)
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) a)
(.f64 (.f64 #s(literal 1 binary64) a) (sin.f64 b))
(*.f64 (neg.f64 (neg.f64 a)) (sin.f64 b))
(.f64 (.f64 a (sin.f64 b)) #s(literal 1 binary64))
(*.f64 (neg.f64 a) (neg.f64 (sin.f64 b)))
(.f64 (.f64 (neg.f64 a) (sin.f64 b)) #s(literal -1 binary64))
(.f64 #s(literal -1 binary64) (.f64 (neg.f64 a) (sin.f64 b)))
(*.f64 a (sin.f64 b))
(.f64 #s(literal 1 binary64) (.f64 a (sin.f64 b)))
(*.f64 (sin.f64 b) a)
(neg.f64 (*.f64 (neg.f64 a) (sin.f64 b)))
(.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) a)
(*.f64 (neg.f64 (sin.f64 b)) a)
(.f64 (.f64 a (sin.f64 b)) #s(literal -1 binary64))
(*.f64 (neg.f64 a) (sin.f64 b))
(.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))
(.f64 a (.f64 (sin.f64 b) #s(literal -1 binary64)))
(*.f64 a (neg.f64 (sin.f64 b)))
(*.f64 (sin.f64 b) (neg.f64 a))
(neg.f64 (*.f64 a (sin.f64 b)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (.f64 (neg.f64 a) (sin.f64 b)))) (*.f64 (neg.f64 a) (sin.f64 b)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 a (sin.f64 b)) (cos.f64 b))) (cos.f64 b))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b))) (cos.f64 b))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 a) (sin.f64 b)) (.f64 (neg.f64 a) (sin.f64 b))) (.f64 (cos.f64 b) (cos.f64 b))) (-.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))
(/.f64 (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 a (sin.f64 b)) (.f64 a (sin.f64 b)))) (+.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 a) (sin.f64 b)) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (neg.f64 a) (sin.f64 b)) (.f64 (neg.f64 a) (sin.f64 b))) (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 a (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 b) (cos.f64 b)) (+.f64 (.f64 (.f64 a (sin.f64 b)) (.f64 a (sin.f64 b))) (.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(/.f64 (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (neg.f64 a) (sin.f64 b)) (.f64 (neg.f64 a) (sin.f64 b)))) (-.f64 (cos.f64 b) (*.f64 (neg.f64 a) (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 b) (cos.f64 b)) (-.f64 (.f64 (.f64 (neg.f64 a) (sin.f64 b)) (.f64 (neg.f64 a) (sin.f64 b))) (.f64 (cos.f64 b) (*.f64 (neg.f64 a) (sin.f64 b))))))
(neg.f64 (-.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))
(-.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (neg.f64 (cos.f64 b)))
(-.f64 (cos.f64 b) (*.f64 a (sin.f64 b)))
(+.f64 (*.f64 (neg.f64 a) (sin.f64 b)) (cos.f64 b))
(+.f64 (cos.f64 b) (*.f64 (neg.f64 a) (sin.f64 b)))
#s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))
(.f64 (/.f64 (sin.f64 b) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))) r)
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (.f64 a (sin.f64 b))))) (.f64 (sin.f64 b) r))
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b)))))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b)))))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(.f64 r (/.f64 (sin.f64 b) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(/.f64 (neg.f64 (.f64 (neg.f64 r) (sin.f64 b))) (neg.f64 (neg.f64 #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b)))))))
(/.f64 (.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (.f64 a (sin.f64 b))))) (.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (- (* (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (.f64 a (sin.f64 b)))) (.f64 (sin.f64 b) r)))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b)))))
(neg.f64 (/.f64 (.f64 (sin.f64 b) r) (neg.f64 #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b)))))))
(neg.f64 (/.f64 (.f64 (neg.f64 r) (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))

eval67.0ms (1.5%)

Memory: 10.0MiB live, 100.7MiB allocated; 9ms collecting garbage
Compiler: Compiled 20 829 to 3 514 computations (83.1% saved)

prune42.0ms (0.9%)

Memory

13.8MiB live, 60.3MiB allocated; 2ms collecting garbage

Pruning

53 alts after pruning (49 fresh and 4 done)

	Pruned	Kept	Total
New	564	28	592
Fresh	12	21	33
Picked	5	0	5
Done	-2	4	2
Total	579	53	632

Accuracy

100.0%

Counts

632 → 53

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.5%	(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
	62.9%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	99.5%	(/.f64 (.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
	65.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
	64.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
	99.4%	(/.f64 (.f64 r (sin.f64 b)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 (sin.f64 a) (tan.f64 b))) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (sin.f64 a))) (.f64 (cos.f64 b) (cos.f64 a))))
	99.5%	(/.f64 (.f64 r (sin.f64 b)) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a)))
	41.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
	40.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
	49.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
	61.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
	39.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
	50.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a))))))
	36.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
	37.4%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
▶	60.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))
	53.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
	48.8%	(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
	62.8%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
▶	99.5%	(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
	99.4%	(.f64 (/.f64 (sin.f64 b) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
	75.3%	(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
	48.8%	(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
	75.3%	(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
	41.4%	(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) (*.f64 (sin.f64 b) r))
	41.6%	(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 b) r))
✓	62.8%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
	75.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
▶	62.8%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
	60.6%	(.f64 (sin.f64 b) (/.f64 r #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
	75.2%	(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
	51.8%	(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
	47.8%	(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
	53.2%	(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
	48.8%	(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	37.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
✓	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
	36.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
✓	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
	48.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
▶	48.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
	36.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
▶	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
	48.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))

Compiler

Compiled 1 853 to 1 461 computations (21.2% saved)

sample0.0ms (0.0%)

Memory

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

Calls

Call 1

Inputs
1
-1/2

Outputs
#s(literal 1 binary64)
#s(literal -1/2 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 4 to 4 computations (0.0% saved)

Precisions

Click to see histograms. Total time spent on operations: 0.0ms

adjust: 0.0ms (0.0% of total)

series91.0ms (2.1%)

Memory

-34.6MiB live, 109.5MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	846	4353

Stop Event

1×	iter-limit

Counts

37 → 151

Calls

Call 1

Inputs
b
(tan.f64 b)
a
(cos.f64 a)
(/.f64 (tan.f64 b) (cos.f64 a))
r
#s(literal 1 binary64)
(tan.f64 a)
(*.f64 (tan.f64 a) (tan.f64 b))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
#s(approx (cos a) #s(literal 1 binary64))
(*.f64 b r)
(/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
(/.f64 (cos.f64 a) b)
(/.f64 (/.f64 (cos.f64 a) b) r)
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (+ a b) b)
(cos.f64 #s(approx (+ a b) b))
(/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r)
(sin.f64 b)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
(*.f64 r (sin.f64 b))
(cos.f64 b)
#s(literal -1/2 binary64)
(*.f64 #s(literal -1/2 binary64) a)
#s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))
(-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))
(.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))
(+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))

Outputs
#s(approx r r)
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (/.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (/.f64 (.f64 r (sin.f64 b)) (.f64 (cos.f64 a) (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b))))))))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (cos a) (* b r)) (/.f64 (cos.f64 a) (*.f64 b r)))
#s(approx (/ 1 (/ (cos a) (* b r))) (/.f64 (*.f64 b r) (cos.f64 a)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b))))
#s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 (+.f64 a b))))
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx a a)
#s(approx (cos a) #s(literal 1 binary64))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (tan b) (cos a)) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (tan b) (cos a)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (tan b) (cos a)) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (tan b) (cos a)) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (+.f64 (.f64 #s(literal 1/48 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (tan a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (tan a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (tan a) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 2/15 binary64) (.f64 #s(literal 17/315 binary64) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (* (tan a) (tan b)) (/.f64 (*.f64 a (sin.f64 b)) (cos.f64 b)))
#s(approx (* (tan a) (tan b)) (.f64 a (+.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (* (tan a) (tan b)) (.f64 a (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2/15 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (* (tan a) (tan b)) (.f64 a (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 17/315 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal 2/15 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))))) (/.f64 (sin.f64 b) (cos.f64 b)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (sin.f64 b)) (cos.f64 b)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (.f64 a (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/15 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 b)) (cos.f64 b))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))))) (/.f64 (sin.f64 b) (cos.f64 b))))))
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (+.f64 r (/.f64 (.f64 a (.f64 r (sin.f64 b))) (cos.f64 b))))
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (+.f64 r (.f64 a (-.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))))))
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (+.f64 r (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 r (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (sin.f64 b) (cos.f64 b))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 b) (cos.f64 b)))))) (cos.f64 b)) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (cos a) (* b r)) (/.f64 #s(literal 1 binary64) (*.f64 b r)))
#s(approx (/ (cos a) (* b r)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 b r))))) (/.f64 #s(literal 1 binary64) (.f64 b r))))
#s(approx (/ (cos a) (* b r)) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (.f64 b r))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 b r))))) (/.f64 #s(literal 1 binary64) (*.f64 b r))))
#s(approx (/ 1 (/ (cos a) (* b r))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (.f64 b r))) (.f64 b r)))
#s(approx (/ 1 (/ (cos a) (* b r))) (+.f64 (.f64 b r) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r))))) (.f64 #s(literal -1/2 binary64) (.f64 b r))))))
#s(approx (/ 1 (/ (cos a) (* b r))) (+.f64 (.f64 b r) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 b r)) (+.f64 (.f64 #s(literal 1/48 binary64) (.f64 b r)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r)))))))) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 b r)) (.f64 #s(literal 1/24 binary64) (.f64 b r))))) (.f64 #s(literal -1/2 binary64) (.f64 b r))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 b))))
#s(approx (/ (cos a) b) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (cos a) b) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (cos a) b) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (cos a) b) (+.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) b)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) b)))) (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 a b))
#s(approx (cos (+ a b)) (cos.f64 b))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (.f64 #s(literal 1/6 binary64) (*.f64 a (sin.f64 b))))) (sin.f64 b)))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 b)) (/.f64 (*.f64 a (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (cos.f64 b))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 b)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 b) #s(literal 2 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 b))))
#s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 b)))
#s(approx (* (/ 1 (cos (+ a b))) r) (+.f64 (/.f64 r (cos.f64 b)) (/.f64 (.f64 a (.f64 r (sin.f64 b))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (* (/ 1 (cos (+ a b))) r) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 b))))
#s(approx (* (/ 1 (cos (+ a b))) r) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 b) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 b)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 b)) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 b))))
#s(approx (* -1/2 a) (*.f64 #s(literal -1/2 binary64) a))
#s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (*.f64 #s(literal -1 binary64) (sin.f64 b)))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b)))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 (cos.f64 b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b)))))))
#s(approx (cos a) (cos.f64 a))
#s(approx (/ (tan b) (cos a)) (/.f64 (sin.f64 b) (*.f64 (cos.f64 a) (cos.f64 b))))
#s(approx (tan a) (/.f64 (sin.f64 a) (cos.f64 a)))
#s(approx (* (tan a) (tan b)) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b))))
#s(approx (- 1 (* (tan a) (tan b))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 a) (cos.f64 b)))))
#s(approx (/ (cos a) b) (/.f64 (cos.f64 a) b))
#s(approx (+ a b) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (cos (+ a b)) (cos.f64 (+.f64 a b)))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 b) a)) (*.f64 #s(literal -1/2 binary64) (cos.f64 b)))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 b)) (/.f64 (cos.f64 b) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (sin.f64 b) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 b (.f64 #s(literal -1 binary64) a)))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 b)) (/.f64 (sin.f64 b) a)))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sin.f64 b) (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 b) a))) a)) (.f64 #s(literal -1/2 binary64) (cos.f64 b)))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (tan b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2/15 binary64) (.f64 #s(literal 17/315 binary64) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (/ (tan b) (cos a)) (/.f64 b (cos.f64 a)))
#s(approx (/ (tan b) (cos a)) (.f64 b (+.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (tan b) (cos a)) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2/15 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (tan b) (cos a)) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 17/315 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a))) (.f64 #s(literal 2/15 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))))) (.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (* (tan a) (tan b)) (/.f64 (*.f64 b (sin.f64 a)) (cos.f64 a)))
#s(approx (* (tan a) (tan b)) (.f64 b (+.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (* (tan a) (tan b)) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2/15 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (* (tan a) (tan b)) (.f64 b (+.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 17/315 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (*.f64 #s(literal 2/15 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))))) (/.f64 (sin.f64 a) (cos.f64 a)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (sin.f64 a)) (cos.f64 a)))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (- 1 (* (tan a) (tan b))) (+.f64 #s(literal 1 binary64) (.f64 b (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2/15 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 a)) (cos.f64 a))) (*.f64 #s(literal 1/3 binary64) (/.f64 (sin.f64 a) (cos.f64 a))))) (/.f64 (sin.f64 a) (cos.f64 a))))))
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (+.f64 r (/.f64 (.f64 b (.f64 r (sin.f64 a))) (cos.f64 a))))
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (+.f64 r (.f64 b (-.f64 (/.f64 (.f64 b (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64)))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (cos.f64 a)))))))
#s(approx (/ r (- 1 (* (tan a) (tan b)))) (+.f64 r (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 3 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (sin.f64 a)) (cos.f64 a)))))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (.f64 b (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (*.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 r (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (* (/ (tan b) (cos a)) (/ r (- 1 (* (tan a) (tan b))))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 r (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (cos.f64 a))) (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64))))))) (.f64 #s(literal 1/3 binary64) (/.f64 r (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (cos.f64 a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a)))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 a)) (.f64 #s(literal 1/6 binary64) (*.f64 b (sin.f64 a))))) (sin.f64 a)))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (/.f64 (*.f64 b (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (/ 1 (cos (+ a b))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (cos.f64 a))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 a) #s(literal 2 binary64)) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 a))))
#s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a)))
#s(approx (* (/ 1 (cos (+ a b))) r) (+.f64 (/.f64 r (cos.f64 a)) (/.f64 (.f64 b (.f64 r (sin.f64 a))) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))
#s(approx (* (/ 1 (cos (+ a b))) r) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a))))
#s(approx (* (/ 1 (cos (+ a b))) r) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 a) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a))))) (cos.f64 a)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (sin.f64 a) #s(literal 2 binary64))) (pow.f64 (cos.f64 a) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (cos.f64 a)))))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 r (sin.f64 a)) (pow.f64 (cos.f64 a) #s(literal 2 binary64)))))) (/.f64 r (cos.f64 a))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) r)))))))
#s(approx (* r (sin b)) (.f64 b (+.f64 r (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) r) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) r)) (*.f64 #s(literal 1/120 binary64) r))))))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 b #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos b) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 b #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* -1/2 (* a (cos b))) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 #s(literal 1/4 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/2 (* a (cos b))) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 a (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) a)))))
#s(approx (* -1/2 (* a (cos b))) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/48 binary64) a) (.f64 #s(literal 1/1440 binary64) (*.f64 a (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal -1/2 binary64) a)))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 b (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 a b)) #s(literal 1 binary64)))))
#s(approx (- (* -1/2 (* a (cos b))) (sin b)) (+.f64 (.f64 #s(literal -1/2 binary64) a) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal 1/6 binary64) b) (*.f64 #s(literal 1/4 binary64) a))) #s(literal 1 binary64)))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 a b)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) b))))))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 a b)) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (.f64 a b)) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cos b) (* a (- (* -1/2 (* a (cos b))) (sin b)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 b (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 a b)) (*.f64 #s(literal 1/4 binary64) (pow.f64 a #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (+ a b) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b))))
#s(approx (sin b) (sin.f64 b))
#s(approx (* a (- (* -1/2 (* a (cos b))) (sin b))) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 a (cos.f64 b))) (sin.f64 b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 r (sin.f64 b)) (cos.f64 (-.f64 a (.f64 #s(literal -1 binary64) b)))))
#s(approx (+ a b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64)))))
#s(approx (cos (+ a b)) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b))))
#s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))
#s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)))))

Calls

9 calls:

Time	Variable	Point
10.0ms	b	-inf
8.0ms	r	inf
6.0ms	a	inf
6.0ms	a	-inf
6.0ms	r	-inf

rewrite132.0ms (3.0%)

Memory

23.3MiB live, 212.2MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	46	293
0	72	285
1	290	281
2	1303	281
0	4196	275

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

37 → 544

Calls

Call 1

Inputs
b
(tan.f64 b)
a
(cos.f64 a)
(/.f64 (tan.f64 b) (cos.f64 a))
r
#s(literal 1 binary64)
(tan.f64 a)
(*.f64 (tan.f64 a) (tan.f64 b))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
#s(approx (cos a) #s(literal 1 binary64))
(*.f64 b r)
(/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
(/.f64 (cos.f64 a) b)
(/.f64 (/.f64 (cos.f64 a) b) r)
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (+ a b) b)
(cos.f64 #s(approx (+ a b) b))
(/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r)
(sin.f64 b)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
(*.f64 r (sin.f64 b))
(cos.f64 b)
#s(literal -1/2 binary64)
(*.f64 #s(literal -1/2 binary64) a)
#s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))
(-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))
(.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))
(+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))
#s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))

Outputs
b
(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 b)))
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (neg.f64 (neg.f64 (cos.f64 b))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 b))) (cos.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (cos.f64 b)))
(/.f64 (sin.f64 b) (cos.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (sin.f64 b)))
(tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) b))
(tan.f64 b)
a
(sin.f64 (+.f64 (neg.f64 (neg.f64 a)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 a)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 a) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a))
(-.f64 (.f64 (sin.f64 a) #s(literal 0 binary64)) (.f64 (cos.f64 a) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 a))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 a))))
(cos.f64 (neg.f64 (neg.f64 a)))
(cos.f64 (neg.f64 (fabs.f64 a)))
(cos.f64 (neg.f64 a))
(cos.f64 (fabs.f64 a))
(cos.f64 a)
(+.f64 (.f64 (sin.f64 (fabs.f64 a)) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 a)) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 #s(literal 0 binary64) (sin.f64 a)))
(+.f64 (.f64 (sin.f64 a) #s(literal 0 binary64)) (.f64 (cos.f64 a) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (tan.f64 b))
(*.f64 (neg.f64 (tan.f64 b)) (/.f64 #s(literal -1 binary64) (cos.f64 a)))
(*.f64 (tan.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 b))) (.f64 (neg.f64 (cos.f64 a)) (neg.f64 (cos.f64 b))))
(/.f64 (.f64 #s(literal -1 binary64) (sin.f64 b)) (.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 b))) (.f64 (cos.f64 a) (neg.f64 (cos.f64 b))))
(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) #s(literal -1 binary64)) (.f64 (neg.f64 (cos.f64 b)) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) #s(literal 1 binary64)) (.f64 (cos.f64 b) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (sin.f64 b) #s(literal -1 binary64)) (.f64 (cos.f64 b) (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (*.f64 (tan.f64 b) #s(literal 1 binary64))) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (neg.f64 (cos.f64 b)))
(/.f64 (neg.f64 (.f64 (sin.f64 b) #s(literal 1 binary64))) (neg.f64 (.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (tan.f64 b)))) (neg.f64 (neg.f64 (neg.f64 (cos.f64 a)))))
(/.f64 (*.f64 (tan.f64 b) #s(literal 1 binary64)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (cos.f64 b))
(/.f64 (.f64 (sin.f64 b) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 b)) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (sin.f64 b) #s(literal 1 binary64)) (.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (neg.f64 (neg.f64 (tan.f64 b))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (sin.f64 b)) (neg.f64 (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (neg.f64 (tan.f64 b)) (neg.f64 (cos.f64 a)))
(/.f64 (sin.f64 b) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 a)) (neg.f64 (tan.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (tan.f64 b)))
(/.f64 (tan.f64 b) (cos.f64 a))
(neg.f64 (/.f64 (tan.f64 b) (neg.f64 (cos.f64 a))))
(neg.f64 (/.f64 (neg.f64 (tan.f64 b)) (cos.f64 a)))
r
#s(literal 1 binary64)
(*.f64 (sin.f64 a) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(/.f64 (neg.f64 (neg.f64 (sin.f64 a))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (sin.f64 a)) (neg.f64 (cos.f64 a)))
(/.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) a) (PI.f64))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (sin.f64 a) (cos.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (sin.f64 a)))
(tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) a) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (+.f64 (PI.f64) a) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) a))
(tan.f64 a)
(*.f64 (tan.f64 a) (tan.f64 b))
(*.f64 (tan.f64 b) (tan.f64 a))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 a))) (.f64 (neg.f64 (cos.f64 b)) (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (*.f64 (tan.f64 a) (sin.f64 b))) (neg.f64 (cos.f64 b)))
(/.f64 (neg.f64 (*.f64 (tan.f64 b) (sin.f64 a))) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (sin.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 (*.f64 (sin.f64 b) (tan.f64 a))) (neg.f64 (cos.f64 b)))
(/.f64 (.f64 (sin.f64 b) (neg.f64 (sin.f64 a))) (.f64 (cos.f64 b) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)) (.f64 (neg.f64 (cos.f64 a)) (cos.f64 b)))
(/.f64 (.f64 (neg.f64 (sin.f64 a)) (neg.f64 (sin.f64 b))) (.f64 (neg.f64 (cos.f64 a)) (neg.f64 (cos.f64 b))))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (*.f64 (tan.f64 a) (sin.f64 b)) (cos.f64 b))
(/.f64 (*.f64 (tan.f64 b) (sin.f64 a)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 a) (tan.f64 b)) (cos.f64 a))
(/.f64 (*.f64 (sin.f64 b) (tan.f64 a)) (cos.f64 b))
(/.f64 (neg.f64 (.f64 (sin.f64 a) (sin.f64 b))) (neg.f64 (.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (.f64 (sin.f64 a) (neg.f64 (sin.f64 b))) (.f64 (cos.f64 a) (neg.f64 (cos.f64 b))))
(/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 (tan.f64 a)) (sin.f64 b)) #s(literal 2 binary64)) (.f64 (cos.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 b) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (cos.f64 b)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (tan.f64 a)) (sin.f64 b)))) (.f64 #s(literal 2 binary64) (cos.f64 b)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (cos.f64 b)) (.f64 #s(literal 2 binary64) (.f64 (tan.f64 a) (sin.f64 b)))) (.f64 #s(literal 2 binary64) (cos.f64 b)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (cos.f64 a)) (.f64 #s(literal 2 binary64) (.f64 (tan.f64 b) (sin.f64 a)))) (.f64 #s(literal 2 binary64) (cos.f64 a)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (cos.f64 a)) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 a) (tan.f64 b)))) (.f64 #s(literal 2 binary64) (cos.f64 a)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (cos.f64 b)) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 b) (tan.f64 a)))) (.f64 #s(literal 2 binary64) (cos.f64 b)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (cos.f64 a))) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 a) (sin.f64 b)))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) (.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) (.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))) (.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (tan.f64 a) (tan.f64 b)) (.f64 (tan.f64 a) (tan.f64 b)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (tan.f64 a) (tan.f64 b)) (.f64 (tan.f64 a) (tan.f64 b))) (.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(neg.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (tan.f64 a))) (tan.f64 b)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b))))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))
(+.f64 (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 a)) (tan.f64 b)))
(.f64 (/.f64 #s(literal -1 binary64) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) r)
(.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 r (/.f64 #s(literal -1 binary64) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 r))) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (neg.f64 r)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 r) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (neg.f64 r)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) r))
(/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))
(neg.f64 (/.f64 r (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a)) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 (.f64 r (tan.f64 b)) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (/.f64 (tan.f64 b) (cos.f64 a)))
(.f64 r (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 (tan.f64 b) (/.f64 r (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(.f64 (tan.f64 b) (/.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)))
(/.f64 (.f64 (.f64 (neg.f64 (tan.f64 b)) r) #s(literal -1 binary64)) (.f64 (neg.f64 (cos.f64 a)) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (neg.f64 (tan.f64 b)) r) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (.f64 (sin.f64 b) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))) #s(literal -1 binary64)) (.f64 (cos.f64 b) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (.f64 (sin.f64 b) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))) #s(literal 1 binary64)) (.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (.f64 (.f64 (tan.f64 b) (neg.f64 r)) #s(literal -1 binary64)) (.f64 (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (.f64 (tan.f64 b) (neg.f64 r)) #s(literal 1 binary64)) (.f64 (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (cos.f64 a)))
(/.f64 (.f64 (.f64 r (tan.f64 b)) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (.f64 r (tan.f64 b)) #s(literal -1 binary64)) (.f64 (cos.f64 a) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 r (tan.f64 b)) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (.f64 (neg.f64 r) (sin.f64 b)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 b) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (.f64 (neg.f64 r) (sin.f64 b)) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 b) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) (cos.f64 a)))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (neg.f64 (neg.f64 r)) (.f64 (tan.f64 b) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 (neg.f64 r)) (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)))
(/.f64 (.f64 (neg.f64 (neg.f64 r)) (.f64 (sin.f64 b) #s(literal 1 binary64))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 (neg.f64 (neg.f64 r)) (neg.f64 (neg.f64 (tan.f64 b)))) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (neg.f64 (cos.f64 a)))))
(/.f64 (.f64 (neg.f64 (neg.f64 r)) (neg.f64 (tan.f64 b))) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (neg.f64 (neg.f64 r)) (tan.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 r) (.f64 (tan.f64 b) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (.f64 (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (cos.f64 b)))
(/.f64 (.f64 (neg.f64 r) (.f64 (sin.f64 b) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (.f64 (neg.f64 r) (neg.f64 (neg.f64 (tan.f64 b)))) (.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (cos.f64 a)))))
(/.f64 (.f64 r (.f64 (tan.f64 b) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 r (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a)))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)))
(/.f64 (.f64 r (.f64 (sin.f64 b) #s(literal 1 binary64))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r (neg.f64 (neg.f64 (tan.f64 b)))) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (neg.f64 (cos.f64 a)))))
(/.f64 (.f64 (.f64 (tan.f64 b) #s(literal 1 binary64)) (neg.f64 (neg.f64 r))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (.f64 (tan.f64 b) #s(literal 1 binary64)) (neg.f64 r)) (.f64 (cos.f64 a) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (tan.f64 b) #s(literal 1 binary64)) r) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (neg.f64 (neg.f64 r))) (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (neg.f64 r)) (.f64 (cos.f64 b) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r) (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (.f64 (sin.f64 b) #s(literal 1 binary64)) (neg.f64 (neg.f64 r))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (.f64 (sin.f64 b) #s(literal 1 binary64)) (neg.f64 r)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 b) #s(literal 1 binary64)) r) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (neg.f64 (neg.f64 (tan.f64 b))) (neg.f64 (neg.f64 r))) (.f64 (neg.f64 (neg.f64 (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (neg.f64 (neg.f64 (tan.f64 b))) (neg.f64 r)) (.f64 (neg.f64 (neg.f64 (cos.f64 a))) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (neg.f64 (neg.f64 (tan.f64 b))) r) (.f64 (neg.f64 (neg.f64 (cos.f64 a))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (neg.f64 (tan.f64 b)) (neg.f64 (neg.f64 r))) (.f64 (neg.f64 (cos.f64 a)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (sin.f64 b) (neg.f64 (neg.f64 r))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (tan.f64 b) (neg.f64 (neg.f64 r))) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 (sin.f64 b)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))) (*.f64 (neg.f64 (cos.f64 b)) (cos.f64 a)))
(/.f64 (*.f64 (neg.f64 (neg.f64 r)) (sin.f64 b)) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (neg.f64 (tan.f64 b)))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (neg.f64 r))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 (.f64 (neg.f64 r) (/.f64 (tan.f64 b) (cos.f64 a)))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 (.f64 (neg.f64 (tan.f64 b)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (.f64 (neg.f64 r) (neg.f64 (tan.f64 b)))) (neg.f64 (.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (neg.f64 (cos.f64 a)))))
(/.f64 (neg.f64 (.f64 (neg.f64 r) (tan.f64 b))) (neg.f64 (.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (cos.f64 a))))
(/.f64 (neg.f64 (.f64 r (neg.f64 (tan.f64 b)))) (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (tan.f64 b)) (neg.f64 r))) (neg.f64 (.f64 (neg.f64 (cos.f64 a)) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a)))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (neg.f64 (neg.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)))) (neg.f64 (neg.f64 (cos.f64 a))))
(/.f64 (neg.f64 (neg.f64 (.f64 r (tan.f64 b)))) (neg.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (tan.f64 b)) r)) (neg.f64 (.f64 (neg.f64 (cos.f64 a)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b)))) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (neg.f64 (.f64 (tan.f64 b) (neg.f64 r))) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (neg.f64 (tan.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (neg.f64 r)) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 b) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (cos.f64 a)))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64)) (.f64 (cos.f64 b) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64)) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 (neg.f64 r) (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(/.f64 (.f64 (neg.f64 (tan.f64 b)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))) (neg.f64 (cos.f64 a)))
(/.f64 (.f64 (sin.f64 b) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))) (*.f64 (cos.f64 b) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 r) (neg.f64 (tan.f64 b))) (.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (neg.f64 r) (tan.f64 b)) (.f64 (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (cos.f64 a)))
(/.f64 (.f64 r (neg.f64 (tan.f64 b))) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (neg.f64 (cos.f64 a))))
(/.f64 (.f64 (neg.f64 (tan.f64 b)) (neg.f64 r)) (.f64 (neg.f64 (cos.f64 a)) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (neg.f64 (tan.f64 b)) r) (.f64 (neg.f64 (cos.f64 a)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (tan.f64 b) (neg.f64 r)) (.f64 (cos.f64 a) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) (sin.f64 b))) (cos.f64 (+.f64 a b)))
(/.f64 (neg.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a))) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b))) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 (.f64 r (tan.f64 b))) (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(/.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)) (cos.f64 a))
(/.f64 (.f64 r (tan.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(/.f64 (.f64 (neg.f64 r) (sin.f64 b)) (.f64 (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64)) (.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (.f64 (neg.f64 r) (sin.f64 b)) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
(/.f64 (.f64 (neg.f64 r) (sin.f64 b)) (.f64 (neg.f64 (cos.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 (+.f64 a b))))
(/.f64 (.f64 (sin.f64 b) r) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 (sin.f64 b) r) (.f64 (cos.f64 b) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 (+.f64 a b)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 a b))) (*.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (*.f64 r (tan.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(neg.f64 (/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (cos.f64 (+.f64 a b))))
(neg.f64 (/.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a)) (-.f64 (.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))))
#s(approx (cos a) #s(literal 1 binary64))
(*.f64 r b)
(*.f64 b r)
(*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 r b)) #s(approx (cos a) #s(literal 1 binary64)))
(.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (.f64 r b)))
(.f64 #s(approx (cos a) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 r b)))
(/.f64 (.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (neg.f64 b) (neg.f64 r)))
(/.f64 (.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) #s(literal 1 binary64)) (.f64 (neg.f64 r) b))
(/.f64 (.f64 #s(approx (cos a) #s(literal 1 binary64)) #s(literal -1 binary64)) (.f64 (neg.f64 r) b))
(/.f64 (neg.f64 (.f64 #s(approx (cos a) #s(literal 1 binary64)) #s(literal 1 binary64))) (.f64 (neg.f64 r) b))
(/.f64 (neg.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r)) (neg.f64 b))
(/.f64 (neg.f64 (neg.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b))) (neg.f64 (neg.f64 r)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (*.f64 (neg.f64 r) b))))
(/.f64 (.f64 #s(approx (cos a) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 r b))
(/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)
(/.f64 (neg.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) (neg.f64 r))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))) (neg.f64 (*.f64 (neg.f64 r) b)))
(/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)
(/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (neg.f64 r) b))
(/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b))
(/.f64 #s(literal 1 binary64) (*.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (*.f64 r b)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) r) b)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) b) r)
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) (pow.f64 (/.f64 #s(literal 1 binary64) r) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r)
(.f64 (/.f64 #s(literal -1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (.f64 r b)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal -1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (.f64 (neg.f64 r) b))
(.f64 (pow.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (.f64 r b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 r b)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 r b)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (.f64 r b))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (.f64 r b))))
(.f64 (.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64)))) #s(literal 1 binary64))
(.f64 (.f64 r b) (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))))
(.f64 #s(literal 1 binary64) (.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64)))))
(*.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64))))
(*.f64 b (/.f64 r #s(approx (cos a) #s(literal 1 binary64))))
(pow.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b)) #s(literal -1 binary64))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (.f64 r b)) #s(literal 2 binary64)) (.f64 #s(approx (cos a) #s(literal 1 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (neg.f64 r) b) #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 r b) #s(literal 2 binary64)) (*.f64 #s(approx (cos a) #s(literal 1 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 r #s(literal 2 binary64)) (.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (.f64 r b))) (.f64 #s(literal 2 binary64) #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 r b))))
(/.f64 (.f64 #s(literal 2 binary64) r) (.f64 #s(literal 2 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 r) b)) (*.f64 #s(literal 2 binary64) (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 r b)) (*.f64 #s(literal 2 binary64) #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 r b))) (neg.f64 #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 r b))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 r b)) #s(approx (cos a) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 r) b)) (neg.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64)))))
(/.f64 #s(literal -2 binary64) (.f64 (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (.f64 r b)) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (.f64 r b))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos a) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 r b)))
(/.f64 (*.f64 (neg.f64 r) b) (neg.f64 #s(approx (cos a) #s(literal 1 binary64))))
(/.f64 (neg.f64 r) (neg.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (*.f64 r b)))
(/.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (.f64 r b)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (.f64 r b))))
(/.f64 (*.f64 r b) #s(approx (cos a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos a) #s(literal 1 binary64))) (*.f64 r b)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b)))
(/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 r b))))
(exp.f64 (.f64 (log.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (.f64 r b))) #s(literal -1 binary64)))
(+.f64 (.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64)))) (/.f64 #s(literal 0 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (.f64 r b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b #s(approx (cos a) #s(literal 1 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) b) (cos.f64 a))
(*.f64 (neg.f64 (cos.f64 a)) (/.f64 #s(literal -1 binary64) b))
(*.f64 (cos.f64 a) (/.f64 #s(literal 1 binary64) b))
(/.f64 (neg.f64 (*.f64 (cos.f64 a) #s(literal 1 binary64))) (neg.f64 b))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 a)))) (neg.f64 (neg.f64 (neg.f64 b))))
(/.f64 (*.f64 (cos.f64 a) #s(literal 1 binary64)) b)
(/.f64 (neg.f64 (neg.f64 (cos.f64 a))) (neg.f64 (neg.f64 b)))
(/.f64 (neg.f64 (cos.f64 a)) (neg.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 b (cos.f64 a)))
(/.f64 (cos.f64 a) b)
(neg.f64 (/.f64 (cos.f64 a) (neg.f64 b)))
(+.f64 (/.f64 (*.f64 (sin.f64 a) #s(literal 0 binary64)) b) (/.f64 (cos.f64 a) b))
(*.f64 (/.f64 #s(literal 1 binary64) r) (/.f64 (cos.f64 a) b))
(*.f64 (/.f64 (cos.f64 a) (neg.f64 b)) (/.f64 #s(literal -1 binary64) r))
(*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))
(.f64 (cos.f64 a) (/.f64 #s(literal 1 binary64) (.f64 r b)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 a) #s(literal 1 binary64))) (*.f64 (neg.f64 r) b))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (cos.f64 a)))) (.f64 (neg.f64 r) (neg.f64 (neg.f64 b))))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 a))) (.f64 (neg.f64 r) (neg.f64 b)))
(/.f64 (.f64 #s(literal -1 binary64) (cos.f64 a)) (.f64 (neg.f64 r) b))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 a) #s(literal 1 binary64))) (*.f64 r b))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (cos.f64 a)))) (.f64 r (neg.f64 (neg.f64 b))))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 a))) (.f64 (neg.f64 r) b))
(/.f64 (.f64 (.f64 (cos.f64 a) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (neg.f64 r) b))
(/.f64 (.f64 (.f64 (cos.f64 a) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 r b))
(/.f64 (.f64 (neg.f64 (neg.f64 (cos.f64 a))) #s(literal -1 binary64)) (.f64 (neg.f64 (neg.f64 b)) (neg.f64 r)))
(/.f64 (.f64 (neg.f64 (neg.f64 (cos.f64 a))) #s(literal 1 binary64)) (.f64 (neg.f64 (neg.f64 b)) r))
(/.f64 (.f64 (neg.f64 (neg.f64 (cos.f64 a))) #s(literal 1 binary64)) (.f64 (neg.f64 b) (neg.f64 r)))
(/.f64 (.f64 (neg.f64 (cos.f64 a)) #s(literal -1 binary64)) (.f64 (neg.f64 b) (neg.f64 r)))
(/.f64 (.f64 (cos.f64 a) #s(literal -1 binary64)) (.f64 (neg.f64 r) b))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 a) b) #s(literal 1 binary64))) (neg.f64 r))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 a)) (/.f64 #s(literal 1 binary64) r))) (neg.f64 (neg.f64 b)))
(/.f64 (neg.f64 (*.f64 (cos.f64 a) (/.f64 #s(literal 1 binary64) r))) (neg.f64 b))
(/.f64 (neg.f64 (/.f64 (cos.f64 a) r)) (neg.f64 b))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 a)) #s(literal 1 binary64))) (neg.f64 (.f64 (neg.f64 r) b)))
(/.f64 (neg.f64 (.f64 (cos.f64 a) #s(literal 1 binary64))) (.f64 (neg.f64 r) b))
(/.f64 (*.f64 (/.f64 (cos.f64 a) b) #s(literal 1 binary64)) r)
(/.f64 (*.f64 (neg.f64 (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)) (neg.f64 b))
(/.f64 (*.f64 (cos.f64 a) (/.f64 #s(literal 1 binary64) r)) b)
(/.f64 (/.f64 (cos.f64 a) r) b)
(/.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b))
(/.f64 (.f64 (neg.f64 (cos.f64 a)) #s(literal 1 binary64)) (.f64 (neg.f64 (neg.f64 b)) (neg.f64 r)))
(/.f64 (.f64 (neg.f64 (cos.f64 a)) #s(literal 1 binary64)) (.f64 (neg.f64 r) b))
(/.f64 (.f64 (cos.f64 a) #s(literal 1 binary64)) (.f64 (neg.f64 b) (neg.f64 r)))
(/.f64 (.f64 (cos.f64 a) #s(literal 1 binary64)) (.f64 r b))
(/.f64 (neg.f64 (neg.f64 (cos.f64 a))) (neg.f64 (*.f64 (neg.f64 r) b)))
(/.f64 (/.f64 (cos.f64 a) (neg.f64 b)) (neg.f64 (neg.f64 (neg.f64 r))))
(/.f64 (/.f64 (cos.f64 a) (neg.f64 b)) (neg.f64 r))
(/.f64 (neg.f64 (cos.f64 a)) (*.f64 (neg.f64 r) b))
(/.f64 (/.f64 (cos.f64 a) b) (neg.f64 (neg.f64 r)))
(/.f64 (/.f64 (cos.f64 a) b) r)
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 r (cos.f64 a)) b))
(/.f64 (cos.f64 a) (*.f64 r b))
(neg.f64 (/.f64 (neg.f64 (cos.f64 a)) (*.f64 r b)))
(+.f64 (/.f64 (.f64 (sin.f64 a) #s(literal 0 binary64)) (.f64 r b)) (/.f64 (cos.f64 a) (*.f64 r b)))
(*.f64 (/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b)) (pow.f64 (/.f64 #s(literal -1 binary64) r) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) b)) (neg.f64 r))
(*.f64 (/.f64 r (neg.f64 (cos.f64 a))) (neg.f64 b))
(*.f64 (/.f64 r (cos.f64 a)) b)
(.f64 (pow.f64 (/.f64 (cos.f64 a) (.f64 r b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (cos.f64 a) (*.f64 r b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) r) #s(literal -1 binary64)) (/.f64 b (cos.f64 a)))
(*.f64 (/.f64 b (cos.f64 a)) (pow.f64 (/.f64 #s(literal 1 binary64) r) #s(literal -1 binary64)))
(*.f64 (/.f64 b (cos.f64 a)) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 r b)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) (.f64 r b))))
(.f64 (.f64 (/.f64 r (cos.f64 a)) b) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 r (cos.f64 a)) b))
(*.f64 r (/.f64 b (cos.f64 a)))
(pow.f64 (/.f64 (cos.f64 a) (*.f64 r b)) #s(literal -1 binary64))
(/.f64 (.f64 (/.f64 r (cos.f64 a)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) b) #s(literal 2 binary64)))
(/.f64 (.f64 (/.f64 b (cos.f64 a)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) r) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 r) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 a) (neg.f64 b)) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 2 binary64) (/.f64 r (cos.f64 a))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) b)))
(/.f64 (.f64 #s(literal 2 binary64) (/.f64 b (cos.f64 a))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) r)))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 r)) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 a) (neg.f64 b))))
(/.f64 (.f64 (.f64 r b) #s(literal 2 binary64)) (*.f64 (cos.f64 a) #s(literal 2 binary64)))
(/.f64 (.f64 r #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 a) b) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 2 binary64) r) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 a) b)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 r b)) (*.f64 #s(literal 2 binary64) (cos.f64 a)))
(/.f64 (neg.f64 (/.f64 r (cos.f64 a))) (neg.f64 (/.f64 #s(literal 1 binary64) b)))
(/.f64 (neg.f64 (/.f64 b (cos.f64 a))) (neg.f64 (/.f64 #s(literal 1 binary64) r)))
(/.f64 (/.f64 r (cos.f64 a)) (/.f64 #s(literal 1 binary64) b))
(/.f64 #s(literal -2 binary64) (.f64 (/.f64 (neg.f64 (cos.f64 a)) (.f64 r b)) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (neg.f64 (cos.f64 a)) (.f64 r b))))
(/.f64 (neg.f64 (neg.f64 r)) (/.f64 (cos.f64 a) b))
(/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r))
(/.f64 (*.f64 (neg.f64 r) b) (neg.f64 (cos.f64 a)))
(/.f64 (neg.f64 r) (/.f64 (cos.f64 a) (neg.f64 b)))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (cos.f64 a)) (*.f64 r b)))
(/.f64 #s(literal 2 binary64) (.f64 (/.f64 (cos.f64 a) (.f64 r b)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 a) (.f64 r b))))
(/.f64 (*.f64 r b) (cos.f64 a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 a)) (*.f64 r b)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (cos.f64 a) (*.f64 r b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) (*.f64 r b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 r b)))
(/.f64 r (/.f64 (cos.f64 a) b))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 a) (*.f64 r b))))
(exp.f64 (.f64 (log.f64 (/.f64 (cos.f64 a) (.f64 r b))) #s(literal -1 binary64)))
(+.f64 (.f64 (/.f64 r (cos.f64 a)) b) (/.f64 #s(literal 0 binary64) (/.f64 (cos.f64 a) (.f64 r b))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (+ a b) b)
(sin.f64 (+.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 #s(approx (+ a b) b))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))
(-.f64 (.f64 (sin.f64 #s(approx (+ a b) b)) #s(literal 0 binary64)) (.f64 (cos.f64 #s(approx (+ a b) b)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 #s(approx (+ a b) b)))))
(cos.f64 (neg.f64 (neg.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 (fabs.f64 #s(approx (+ a b) b))))
(cos.f64 (neg.f64 #s(approx (+ a b) b)))
(cos.f64 (fabs.f64 #s(approx (+ a b) b)))
(cos.f64 #s(approx (+ a b) b))
(+.f64 (.f64 (sin.f64 (neg.f64 #s(approx (+ a b) b))) #s(literal 0 binary64)) (.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 #s(approx (+ a b) b))) #s(literal 0 binary64)) (.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 #s(literal 0 binary64) (sin.f64 #s(approx (+ a b) b))))
(+.f64 (.f64 (sin.f64 #s(approx (+ a b) b)) #s(literal 0 binary64)) (.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 #s(approx (+ a b) b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 #s(approx (+ a b) b)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 #s(approx (+ a b) b))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
(pow.f64 (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))) #s(literal -1 binary64))
(pow.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 #s(approx (+ a b) b))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 #s(approx (+ a b) b))))
(exp.f64 (*.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (/.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (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) (cos.f64 #s(approx (+ a b) b))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r)
(*.f64 #s(literal 1 binary64) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
(*.f64 r (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 r #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) r)) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 r)) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (.f64 #s(literal 2 binary64) r) (.f64 #s(literal 2 binary64) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (neg.f64 (*.f64 r #s(literal -1 binary64))) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) r)) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (*.f64 r #s(literal -1 binary64)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 #s(literal -1 binary64) r) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (neg.f64 (neg.f64 r)) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (neg.f64 r) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) r))
(/.f64 r (cos.f64 #s(approx (+ a b) b)))
(sin.f64 b)
(.f64 (.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b)))) r)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)) r)
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b))))
(.f64 r (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r))) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))) (.f64 #s(literal 2 binary64) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 b) r)) (*.f64 #s(literal 2 binary64) (cos.f64 #s(approx (+ a b) b))))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r))) (neg.f64 (neg.f64 (cos.f64 #s(approx (+ a b) b)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r))) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 b) r)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 (cos.f64 #s(approx (+ a b) b))))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (sin.f64 b) r)
(*.f64 r (sin.f64 b))
(sin.f64 (+.f64 (neg.f64 (neg.f64 b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 b) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b))
(-.f64 (.f64 (sin.f64 b) #s(literal 0 binary64)) (.f64 (cos.f64 b) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 b))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 b))))
(cos.f64 (neg.f64 (neg.f64 b)))
(cos.f64 (neg.f64 (fabs.f64 b)))
(cos.f64 (neg.f64 b))
(cos.f64 (fabs.f64 b))
(cos.f64 b)
(+.f64 (.f64 (neg.f64 (sin.f64 b)) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 b)) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 b)) (.f64 #s(literal 0 binary64) (sin.f64 b)))
(+.f64 (.f64 (sin.f64 b) #s(literal 0 binary64)) (.f64 (cos.f64 b) #s(literal 1 binary64)))
#s(literal -1/2 binary64)
(*.f64 #s(literal -1/2 binary64) a)
(*.f64 a #s(literal -1/2 binary64))
#s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sin.f64 b)) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)))) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)))) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)))
(/.f64 (-.f64 (.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 b)))) (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (neg.f64 (sin.f64 b))))
(/.f64 (+.f64 (pow.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) (-.f64 (.f64 (neg.f64 (sin.f64 b)) (neg.f64 (sin.f64 b))) (.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (neg.f64 (sin.f64 b))))))
(/.f64 (-.f64 (.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) (.f64 (sin.f64 b) (sin.f64 b))) (+.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))
(/.f64 (-.f64 (pow.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) (+.f64 (.f64 (sin.f64 b) (sin.f64 b)) (.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))))
(neg.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))))
(-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (neg.f64 (neg.f64 (sin.f64 b))))
(-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))
(+.f64 (neg.f64 (sin.f64 b)) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)))
(+.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (neg.f64 (sin.f64 b)))
(.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a)
(.f64 a (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)))
(neg.f64 (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))
(+.f64 (.f64 a #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) (.f64 a (neg.f64 (sin.f64 b))))
(+.f64 (.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) a) (.f64 (neg.f64 (sin.f64 b)) a))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 b) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a))) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a) (cos.f64 b))) (cos.f64 b))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (cos.f64 b))) (cos.f64 b))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a)) (.f64 (cos.f64 b) (cos.f64 b))) (-.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (cos.f64 b)))
(/.f64 (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a))) (+.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) #s(literal 3 binary64)) (pow.f64 (cos.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a)) (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (cos.f64 b)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 b) (cos.f64 b)) (+.f64 (.f64 (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a)) (.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(/.f64 (-.f64 (.f64 (cos.f64 b) (cos.f64 b)) (.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a))) (-.f64 (cos.f64 b) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a)))
(/.f64 (+.f64 (pow.f64 (cos.f64 b) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 b) (cos.f64 b)) (-.f64 (.f64 (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (.f64 (-.f64 #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a)) (.f64 (cos.f64 b) (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a)))))
(neg.f64 (-.f64 (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a) (cos.f64 b)))
(-.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (neg.f64 (cos.f64 b)))
(-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))
(+.f64 (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a) (cos.f64 b))
(+.f64 (cos.f64 b) (.f64 (neg.f64 (neg.f64 a)) (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))
(+.f64 (cos.f64 b) (.f64 (-.f64 #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b)) a))
#s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))
(.f64 (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))) r)
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a)))) (.f64 (sin.f64 b) r))
(.f64 (.f64 (neg.f64 r) (sin.f64 b)) (/.f64 #s(literal -1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(.f64 (sin.f64 b) (.f64 r (/.f64 #s(literal 1 binary64) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64))) (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 r) (sin.f64 b)))) (neg.f64 (neg.f64 (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))))
(/.f64 (.f64 (.f64 (sin.f64 b) r) #s(literal 1 binary64)) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))))
(/.f64 (neg.f64 (.f64 (neg.f64 r) (sin.f64 b))) (neg.f64 (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))))))
(/.f64 (.f64 (neg.f64 r) (sin.f64 b)) (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))
(/.f64 (.f64 (sin.f64 b) r) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a)))) (.f64 (neg.f64 r) (sin.f64 b))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx ( -1/2 (* a (cos b))) (.f64 #s(literal -1/2 binary64) a))) a))) (.f64 (sin.f64 b) r)))
(neg.f64 (/.f64 (.f64 (sin.f64 b) r) (neg.f64 #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a))))))
(neg.f64 (/.f64 (.f64 (neg.f64 r) (sin.f64 b)) #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a))) a)))))

eval68.0ms (1.5%)

Memory: 17.8MiB live, 110.5MiB allocated; 12ms collecting garbage
Compiler: Compiled 17 834 to 3 121 computations (82.5% saved)

prune50.0ms (1.1%)

Memory

-10.3MiB live, 83.4MiB allocated; 3ms collecting garbage

Pruning

69 alts after pruning (61 fresh and 8 done)

	Pruned	Kept	Total
New	658	34	692
Fresh	17	27	44
Picked	5	0	5
Done	-4	8	4
Total	676	69	745

Accuracy

100.0%

Counts

745 → 69

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.5%	(/.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
	99.5%	(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)) (cos.f64 a))
	99.5%	(/.f64 (.f64 (sin.f64 b) r) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
	62.9%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	99.5%	(/.f64 (.f64 r (tan.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
✓	99.5%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
	64.1%	(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
	41.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
	40.9%	(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
	49.3%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
	61.0%	(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
	39.3%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
	50.6%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a))))))
	36.7%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
	37.4%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
✓	60.2%	(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))
	53.3%	(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
	48.8%	(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
	99.0%	(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (*.f64 r (tan.f64 b))))
	62.8%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
	63.9%	(.f64 (/.f64 (tan.f64 b) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
	99.5%	(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (cos.f64 b)) (.f64 #s(literal 2 binary64) (.f64 (tan.f64 a) (sin.f64 b)))) (*.f64 #s(literal 2 binary64) (cos.f64 b)))))
✓	99.5%	(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
	99.4%	(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) r)))
	99.5%	(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) r))
	99.4%	(.f64 (/.f64 (sin.f64 b) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
	75.3%	(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
	48.8%	(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
	62.8%	(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
	62.7%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) r)) (sin.f64 b))
	99.4%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (tan.f64 b))) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
	41.4%	(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) (*.f64 (sin.f64 b) r))
	41.6%	(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 b) r))
	99.5%	(.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
	41.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) r) (sin.f64 b))
	41.6%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) r) (sin.f64 b))
	62.8%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)) r)
✓	62.8%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
	47.8%	(.f64 (.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) r) (sin.f64 b))
	53.3%	(.f64 (.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r) (sin.f64 b))
	99.4%	(.f64 (.f64 r (tan.f64 b)) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
	99.5%	(.f64 (tan.f64 b) (/.f64 r (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
	60.6%	(.f64 (sin.f64 b) (/.f64 r #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
	51.8%	(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
	49.5%	(.f64 #s(approx (/ (tan b) (cos a)) (/.f64 b (cos.f64 a))) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
	53.2%	(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
	53.3%	(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
	48.8%	(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
	37.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
✓	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
	36.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
✓	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
	36.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
✓	48.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
	36.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
	36.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
	36.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
	36.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
✓	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
	48.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
	36.6%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
	49.1%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
	36.7%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
	49.0%	#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))

Compiler

Compiled 1 254 to 988 computations (21.2% saved)

regimes616.0ms (13.9%)

Memory

15.8MiB live, 867.0MiB allocated; 131ms collecting garbage

Counts

7 → 1

10 → 1

36 → 1

37 → 1

39 → 3

41 → 3

42 → 1

80 → 1

84 → 1

111 → 1

Calls

Call 1

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))

Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))

Call 2

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))

Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))

Call 3

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))

Outputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))

Call 4

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))

Outputs
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))

Call 5

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))

Outputs

(*.f64 #s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))

(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))

(*.f64 #s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))

Call 6

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))

Outputs

(*.f64 #s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))

(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))

(*.f64 #s(approx (* (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))

Call 7

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))

Outputs
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))

Call 8

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
(.f64 (.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r) (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(.f64 (sin.f64 b) (.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) r)) (sin.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))
(.f64 #s(approx (/ (tan b) (cos a)) (/.f64 b (cos.f64 a))) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(.f64 (.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) r) (sin.f64 b))
(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))

Outputs
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)

Call 9

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
(.f64 (.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r) (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(.f64 (sin.f64 b) (.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) r)) (sin.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))
(.f64 #s(approx (/ (tan b) (cos a)) (/.f64 b (cos.f64 a))) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(.f64 (.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) r) (sin.f64 b))
(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (tan.f64 b) (/.f64 r (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (.f64 r (tan.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(.f64 (.f64 r (tan.f64 b)) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))

Outputs
(.f64 (tan.f64 b) (/.f64 r (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))

Call 10

Inputs
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) #s(literal 1 binary64)) (*.f64 b r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos a) #s(literal 1 binary64)) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 r (/.f64 b (cos.f64 a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 b (cos.f64 a)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 r (cos.f64 a)) b))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (*.f64 b r) (cos.f64 a)))
(/.f64 #s(approx (* r (sin b)) (*.f64 b r)) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) b) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 b r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 r b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 r (/.f64 (cos.f64 a) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (neg.f64 a) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) b)) r))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 a b))))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) b) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 a) r) b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 (/.f64 b (cos.f64 a)) (/.f64 #s(literal 1 binary64) r)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) (.f64 b r))))
(.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
(.f64 (/.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) (cos.f64 (+.f64 a b))) r)
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) #s(approx (+ (cos b) (* -1 (* a (sin b)))) (+.f64 #s(literal 1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1/2 binary64) b)))))))
(/.f64 (.f64 #s(approx (sin b) (.f64 (-.f64 (.f64 (.f64 b b) #s(literal -1/6 binary64)) #s(literal -1 binary64)) b)) r) (cos.f64 (+.f64 a b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 a) b) (/.f64 #s(literal 1 binary64) r))))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(approx (cos a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal 2 binary64))))) b) r)))
(.f64 #s(approx ( (/ 1 (cos (+ a b))) r) (/.f64 r (cos.f64 a))) (sin.f64 b))
(*.f64 (/.f64 r (cos.f64 #s(approx (+ a b) b))) (sin.f64 b))
(/.f64 (*.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (cos.f64 a)))
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 #s(approx (+ a b) b)))
(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
(*.f64 (/.f64 r (cos.f64 (+.f64 a b))) (sin.f64 b))
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(*.f64 (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))) r)
(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
(.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (.f64 (sin.f64 b) r))
(.f64 (.f64 #s(approx (/ 1 (cos (+ a b))) (/.f64 #s(literal 1 binary64) (cos.f64 a))) r) (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) r) (sin.f64 b))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)) r)
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (.f64 (sin.f64 b) r))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
(.f64 (neg.f64 r) (.f64 (sin.f64 b) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(.f64 (sin.f64 b) (.f64 (neg.f64 r) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 a b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) r)) (sin.f64 b))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64)))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(approx (+ a b) b)))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) r) (sin.f64 b))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 (neg.f64 #s(approx (+ a b) b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64))))))) (cos.f64 (+.f64 a b)))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b)))
(/.f64 (.f64 r (sin.f64 b)) (cos.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) (-.f64 b a))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (-.f64 (cos.f64 b) (*.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 #s(approx (* -1/2 (* a (cos b))) (*.f64 #s(literal -1/2 binary64) a)) (sin.f64 b))))))
(.f64 #s(approx (/ (tan b) (cos a)) (/.f64 b (cos.f64 a))) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b))))))
(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(.f64 (.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 #s(approx (+ a b) b))) #s(literal -1 binary64))) r) (sin.f64 b))
(.f64 (exp.f64 (.f64 (log.f64 (cos.f64 (+.f64 a b))) #s(literal -1 binary64))) (*.f64 (sin.f64 b) r))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos b) (cos a)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b))))
(.f64 (tan.f64 b) (/.f64 r (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 a (sin.f64 b)))))
(/.f64 (.f64 r (tan.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)))
(.f64 (.f64 r (tan.f64 b)) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a))))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(/.f64 (.f64 r (/.f64 (tan.f64 b) (cos.f64 a))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)) (cos.f64 a))
(/.f64 (/.f64 (.f64 r (tan.f64 b)) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))))
(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (-.f64 (cos.f64 b) (.f64 (-.f64 (sin.f64 b) (.f64 (.f64 a (cos.f64 b)) #s(literal -1/2 binary64))) a)))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 b (cos.f64 a))) (sin.f64 a))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (cos.f64 b))) (sin.f64 b))))))
(/.f64 (.f64 r (sin.f64 b)) #s(approx (- ( (cos b) (cos a)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 b (cos.f64 a))) (sin.f64 a))))))
(.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))) (tan.f64 b)) (/.f64 #s(literal 1 binary64) (cos.f64 a)))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (tan.f64 a) (tan.f64 b)) #s(literal 1 binary64))) r))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 a)) (*.f64 r (tan.f64 b))))
(.f64 (/.f64 (tan.f64 b) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))) (/.f64 r (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (tan.f64 b))) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) r)))
(/.f64 (.f64 r (sin.f64 b)) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b)) (cos.f64 a)))
(/.f64 (.f64 (sin.f64 b) r) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))
(.f64 (/.f64 (sin.f64 b) (.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 a) (tan.f64 b))) (cos.f64 b))) (/.f64 r (cos.f64 a)))
(/.f64 (.f64 (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))) (sin.f64 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (cos (+ a b))) (+.f64 (/.f64 (.f64 a (.f64 r (pow.f64 (sin.f64 b) #s(literal 2 binary64)))) (pow.f64 (cos.f64 b) #s(literal 2 binary64))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b))))
(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (sin.f64 a))) (.f64 (cos.f64 b) (cos.f64 a))))
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (cos.f64 b)) (.f64 #s(literal 2 binary64) (.f64 (tan.f64 a) (sin.f64 b)))) (*.f64 #s(literal 2 binary64) (cos.f64 b)))))
(/.f64 (.f64 r (sin.f64 b)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (cos.f64 b) (cos.f64 a)))) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (cos.f64 a)) (.f64 (sin.f64 a) (tan.f64 b))) (cos.f64 a)) (*.f64 (cos.f64 b) (cos.f64 a))))
(/.f64 (.f64 r (sin.f64 b)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b)))) (.f64 (.f64 (sin.f64 (+.f64 a b)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))))))))
(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (.f64 (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)) (.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (neg.f64 (sin.f64 b)) (sin.f64 a)))))
(/.f64 (.f64 r (sin.f64 b)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 a) (sin.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (cos.f64 b) (cos.f64 a))) (+.f64 (.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))) (.f64 (.f64 (cos.f64 b) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))))

Outputs
(.f64 (/.f64 (tan.f64 b) (cos.f64 a)) (/.f64 r (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 a) (tan.f64 b)))))

Calls

37 calls:

33.0ms	a
31.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
31.0ms	(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))
29.0ms	b
27.0ms	r

Results

Accuracy	Segments	Branch
36.7%	1	`a`
36.7%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
36.7%	1	`b`
36.7%	1	`r`
49.1%	1	`a`
49.1%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
49.1%	1	`b`
49.1%	1	`r`
49.1%	1	`b`
49.1%	1	`a`
49.1%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
49.1%	1	`r`
53.3%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
53.3%	1	`r`
53.3%	1	`b`
53.3%	1	`a`
75.5%	3	`a`
62.9%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
64.8%	2	`r`
75.6%	3	`a`
75.1%	3	`b`
75.3%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
75.3%	1	`r`
75.3%	1	`a`
75.3%	1	`b`
75.3%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
75.3%	1	`r`
75.3%	1	`a`
75.3%	1	`b`
99.5%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
99.5%	1	`r`
99.5%	1	`a`
99.5%	1	`b`
99.5%	1	`(/.f64 (*.f64 r (sin.f64 b)) (cos.f64 (+.f64 a b)))`
99.5%	1	`r`
99.5%	1	`a`
99.5%	1	`b`

Compiler

Compiled 2 207 to 577 computations (73.9% saved)

bsearch54.0ms (1.2%)

Memory

1.5MiB live, 50.1MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
22.0ms	2.2733907842496643e-8	1.243157801894583
28.0ms	-27912490279044680.0	-0.47920409646220014

Samples

33.0ms	216×	1	valid
5.0ms	88×	0	valid

Compiler

Compiled 525 to 470 computations (10.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 29.0ms

ival-cos: 13.0ms (44.1% of total)

ival-sin: 7.0ms (23.7% of total)

adjust: 4.0ms (13.6% of total)

ival-div!: 2.0ms (6.8% of total)

ival-mult!: 2.0ms (6.8% of total)

ival-add!: 1.0ms (3.4% of total)

bsearch2.0ms (0.1%)

Memory

3.0MiB live, 3.0MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.2733907842496643e-8	1.243157801894583
1.0ms	-27912490279044680.0	-0.47920409646220014

Compiler

Compiled 525 to 470 computations (10.5% saved)

derivations130.0ms (2.9%)

Memory

-4.6MiB live, 87.6MiB allocated; 6ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 216 to 57 computations (73.6% saved)

preprocess83.0ms (1.9%)

Memory: 12.2MiB live, 152.3MiB allocated; 17ms collecting garbage
Compiler: Compiled 657 to 339 computations (48.4% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze742.0ms (16.8%)

sample1.4s (32.6%)

preprocess28.0ms (0.6%)

sample0.0ms (0.0%)

series43.0ms (1.0%)

rewrite156.0ms (3.5%)

eval16.0ms (0.4%)

prune19.0ms (0.4%)

sample0.0ms (0.0%)

series76.0ms (1.7%)

rewrite161.0ms (3.6%)

eval100.0ms (2.3%)

prune39.0ms (0.9%)

sample0.0ms (0.0%)

series105.0ms (2.4%)

rewrite163.0ms (3.7%)

eval67.0ms (1.5%)

prune42.0ms (0.9%)

sample0.0ms (0.0%)

series91.0ms (2.1%)

rewrite132.0ms (3.0%)

eval68.0ms (1.5%)

prune50.0ms (1.1%)

regimes616.0ms (13.9%)

bsearch54.0ms (1.2%)

bsearch2.0ms (0.1%)

derivations130.0ms (2.9%)

preprocess83.0ms (1.9%)

end0.0ms (0.0%)

Profiling