Metrics for rsin B (should all be same)

start0.0ms (0.0%)

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

analyze210.0ms (6.6%)

Memory

-4.9MiB live, 70.3MiB allocated; 5ms 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.2s (38.5%)

Memory

14.1MiB live, 313.2MiB allocated; 25ms collecting garbage

Samples

842.0ms	6 013×	1	valid
124.0ms	2 243×	0	valid

Precisions

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

ival-cos: 258.0ms (35.7% of total, 40.0 MiB)

ival-sin: 187.0ms (25.9% of total, 27.0 MiB)

adjust: 119.0ms (16.5% of total, 13.3 MiB)

ival-mult!: 60.0ms (8.3% of total, 9.9 MiB)

ival-div!: 53.0ms (7.3% of total, 7.8 MiB)

ival-add!: 44.0ms (6.1% of total, 7.7 MiB)

Bogosity

preprocess23.0ms (0.7%)

Memory

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

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	38	95
1	177	93
2	799	93

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(negabs r)

Compiler

Compiled 18 to 16 computations (11.1% saved)

series26.0ms (0.8%)

Memory

1.4MiB live, 16.3MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	277	1257

Stop Event

1×	iter-limit

Counts

8 → 46

Calls

Call 1

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

Outputs
#s(approx r #s(literal 0 binary64))
#s(approx r r)
#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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 b) (cos.f64 b)))
#s(approx (/ (sin b) (cos (+ a b))) (+.f64 (/.f64 (sin.f64 b) (cos.f64 b)) (/.f64 (*.f64 a (pow.f64 (sin.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 b) #s(literal 2 binary64)))))
#s(approx (/ (sin b) (cos (+ a b))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (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 (sin.f64 b) (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 2 binary64)))))) (/.f64 (sin.f64 b) (cos.f64 b))))
#s(approx (/ (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 (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 (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 (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 (sin.f64 b) (cos.f64 b))))) (cos.f64 b)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (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 (sin.f64 b) (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 2 binary64)))))) (/.f64 (sin.f64 b) (cos.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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 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 (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 (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a)))
#s(approx (/ (sin b) (cos (+ a b))) (.f64 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 (/ (sin b) (cos (+ a b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (+.f64 (.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/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (*.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 (/ (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/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a))) (+.f64 (.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/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (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 (.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/6 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 a)))))) (.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 (* 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 (/ (sin b) (cos (+ a b))) (/.f64 (sin.f64 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
1.0ms	b	0
1.0ms	r	-inf
1.0ms	r	inf
1.0ms	r	0
1.0ms	a	0

rewrite116.0ms (3.6%)

Memory

-2.8MiB live, 46.3MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	8	28
0	13	28
1	58	28
2	259	28
3	1611	28
0	4200	28

Stop Event

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

Counts

8 → 124

Calls

Call 1

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

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

eval15.0ms (0.5%)

Memory: -0.8MiB live, 14.2MiB allocated; 1ms collecting garbage
Compiler: Compiled 3 222 to 807 computations (75.0% saved)

prune11.0ms (0.3%)

Memory

1.4MiB live, 11.8MiB allocated; 0ms collecting garbage

Pruning

26 alts after pruning (26 fresh and 0 done)

	Pruned	Kept	Total
New	137	26	163
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	138	26	164

Accuracy

99.9%

Counts

164 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	80.4%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
	80.7%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
▶	80.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
	15.0%	(*.f64 #s(approx r #s(literal 0 binary64)) (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))
▶	10.6%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	7.4%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	99.5%	(.f64 r (/.f64 (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.6%	(.f64 r (/.f64 (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))))))
	80.7%	(.f64 r (/.f64 (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.6%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	99.6%	(.f64 r (/.f64 (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.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64))))))
▶	42.2%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	35.9%	(.f64 r (/.f64 (sin.f64 b) (cos.f64 (/.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)))))))
	68.5%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
	66.3%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))))
	50.7%	(.f64 r (/.f64 (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)))))))
	51.4%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
	53.0%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 a))))
	9.7%	(.f64 r (/.f64 (cos.f64 (+.f64 (neg.f64 b) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 a b))))
	49.9%	(.f64 r (/.f64 #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))))
	80.7%	(*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (sin.f64 b))))
	80.7%	(.f64 r (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (sin.f64 b)))
	50.2%	(*.f64 r #s(approx (/ (sin b) (cos (+ a b))) (/.f64 b (cos.f64 a))))
	68.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
▶	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))

Compiler

Compiled 916 to 292 computations (68.1% saved)

series72.0ms (2.2%)

Memory

2.6MiB live, 47.4MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1063	6914

Stop Event

1×	iter-limit

Counts

36 → 182

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable	Point
6.0ms	b	0
5.0ms	b	inf
5.0ms	r	0
5.0ms	a	inf
4.0ms	a	0

rewrite144.0ms (4.5%)

Memory

-10.9MiB live, 64.5MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	41	237
0	71	203
1	321	177
2	1822	177
0	4999	177

Stop Event

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

Counts

36 → 588

Calls

Call 1

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

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

eval77.0ms (2.4%)

Memory: 4.5MiB live, 73.3MiB allocated; 7ms collecting garbage
Compiler: Compiled 21 721 to 4 296 computations (80.2% saved)

prune34.0ms (1.1%)

Memory

-6.6MiB live, 37.6MiB allocated; 3ms collecting garbage

Pruning

55 alts after pruning (52 fresh and 3 done)

	Pruned	Kept	Total
New	757	42	799
Fresh	11	10	21
Picked	2	3	5
Done	0	0	0
Total	770	55	825

Accuracy

100.0%

Counts

825 → 55

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	80.4%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (*.f64 (sin.f64 b) r)))
	80.7%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
	99.5%	(.f64 (sin.f64 b) (/.f64 r (/.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)))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
▶	99.6%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	80.5%	(.f64 (sin.f64 b) (/.f64 r (+.f64 (.f64 (sin.f64 (+.f64 a b)) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 a b)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
	99.6%	(.f64 (sin.f64 b) (/.f64 r (.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)))))
	42.6%	(.f64 (sin.f64 b) (/.f64 r (sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
	35.8%	(.f64 (sin.f64 b) (/.f64 r (cos.f64 (/.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)))))))
✓	80.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
▶	68.5%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	50.7%	(.f64 (sin.f64 b) (/.f64 r #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)))))))
	51.4%	(.f64 (sin.f64 b) (/.f64 r #s(approx (cos (+ a b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (*.f64 b (sin.f64 a)))))))
	80.7%	(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) r)))
	53.0%	(*.f64 (sin.f64 b) #s(approx (/ r (cos (+ a b))) (/.f64 r (cos.f64 a))))
	9.7%	(.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	49.9%	(.f64 #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 (cos.f64 (+.f64 a b))))
	49.8%	(.f64 r (/.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (sin.f64 b) (sin.f64 b)) (-.f64 (.f64 (sin.f64 b) (sin.f64 b)) (.f64 (sin.f64 b) (sin.f64 b))))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	10.8%	(.f64 r (/.f64 (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	8.5%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (+.f64 (PI.f64) b))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	10.7%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (sin.f64 (+.f64 b (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
▶	7.9%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	10.6%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 #s(approx (- ( 1/2 (PI)) b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	80.7%	(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 b) (sin.f64 b)))) (cos.f64 (+.f64 a b))))
	52.9%	(.f64 r (/.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64))) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))))))
	9.2%	(.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	7.4%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	80.7%	(.f64 r (/.f64 (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.4%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (+.f64 (.f64 (sin.f64 b) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 b) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	57.1%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (cos.f64 a)) (.f64 (sin.f64 a) (sin.f64 b)))))
✓	99.6%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	63.8%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
	69.3%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (sin.f64 a) (sin.f64 b)))))
	33.4%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (neg.f64 b) a) (-.f64 (neg.f64 b) a)) (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (-.f64 (neg.f64 b) a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))
	41.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64))))))
	12.8%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (- (neg b) (- a ( 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a)))))
	68.5%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
	66.3%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))))
	53.0%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 a))))
	7.0%	(.f64 r (/.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	80.7%	(*.f64 r (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (sin.f64 b))))
	80.7%	(.f64 r (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (sin.f64 b)))
	10.7%	(.f64 r #s(approx (/ (/ (- (cos (- ( 1/2 (PI)) b)) (neg (sin b))) 2) (cos (+ a b))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (cos.f64 b)))))
	37.2%	(.f64 r #s(approx (/ (sin b) (sin (- (neg b) (- a ( 1/2 (PI)))))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
	99.6%	#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)))))
	42.2%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
	42.3%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
	68.5%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
	15.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b #s(approx r #s(literal 0 binary64))) (cos.f64 a)))
	37.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
✓	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
	36.2%	#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)))))))
▶	37.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
	49.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 a) (*.f64 b r))))
	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	50.1%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))

Compiler

Compiled 1 769 to 535 computations (69.8% saved)

series61.0ms (1.9%)

Memory

-2.2MiB live, 43.0MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	936	6156

Stop Event

1×	iter-limit

Counts

42 → 173

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable	Point
5.0ms	b	0
4.0ms	r	0
3.0ms	a	inf
3.0ms	b	inf
3.0ms	b	-inf

rewrite131.0ms (4.1%)

Memory

5.0MiB live, 59.4MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	48	276
0	82	245
1	352	225
2	1916	225
0	4436	225

Stop Event

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

Counts

42 → 622

Calls

Call 1

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

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

eval77.0ms (2.4%)

Memory: 3.7MiB live, 72.3MiB allocated; 9ms collecting garbage
Compiler: Compiled 21 011 to 4 270 computations (79.7% saved)

prune39.0ms (1.2%)

Memory

2.8MiB live, 43.4MiB allocated; 1ms collecting garbage

Pruning

72 alts after pruning (66 fresh and 6 done)

	Pruned	Kept	Total
New	729	34	763
Fresh	15	32	47
Picked	2	3	5
Done	0	3	3
Total	746	72	818

Accuracy

100.0%

Counts

818 → 72

Alt Table

Click to see full alt table

Status	Accuracy	Program
	68.5%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	80.7%	(/.f64 r (/.f64 (cos.f64 (+.f64 a b)) (sin.f64 b)))
	99.0%	(/.f64 #s(literal 1 binary64) (/.f64 (/.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)))))) (.f64 (sin.f64 b) r)))
	80.2%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 (+.f64 a b)) (sin.f64 b)) r))
▶	41.4%	(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 a (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (.f64 (sin.f64 b) r)))
	49.5%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (.f64 #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))) r)))
	68.2%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
	90.6%	(/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 b) r)) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 b) r))))
	50.3%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (/.f64 (+.f64 (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) r)) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) r)) (*.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 a) r)))))) (/.f64 (cos.f64 a) r)) b)))
	51.9%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (sin.f64 a)) r)) (/.f64 (cos.f64 a) r)) b)))
	49.8%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (/.f64 (cos.f64 a) (*.f64 b r))))
	64.5%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a r)) (/.f64 (cos.f64 b) (.f64 r (sin.f64 b))))))
	80.3%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r)) #s(literal -1 binary64)))
	80.7%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
	42.2%	(.f64 (.f64 (+.f64 (sin.f64 b) (sin.f64 b)) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 (-.f64 a (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) r))
	54.2%	(.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (sin.f64 b) (sin.f64 b)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b))) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (sin.f64 b) (sin.f64 b)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))))))
	68.5%	(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
	52.9%	(.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64))) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))))))
	7.5%	(*.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	99.5%	(.f64 (sin.f64 b) (/.f64 r (/.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)))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
	99.4%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (+.f64 (.f64 (sin.f64 b) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 b) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 a) (sin.f64 b)))))
	57.1%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (.f64 (sin.f64 a) (sin.f64 b)))))
✓	99.6%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	63.7%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
	99.6%	(.f64 (sin.f64 b) (/.f64 r (.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)))))
	42.6%	(.f64 (sin.f64 b) (/.f64 r (sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
	35.8%	(.f64 (sin.f64 b) (/.f64 r (cos.f64 (/.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)))))))
✓	80.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
✓	68.5%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	50.7%	(.f64 (sin.f64 b) (/.f64 r #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)))))))
	68.4%	(*.f64 (sin.f64 b) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) r)))
	53.0%	(.f64 (sin.f64 b) #s(approx (/ r (- ( (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 r (cos.f64 a))))
	9.7%	(.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	9.9%	(.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	9.5%	(.f64 (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64))) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	49.9%	(.f64 #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 (cos.f64 (+.f64 a b))))
	49.8%	(.f64 r (/.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 b) #s(literal 3 binary64)) (pow.f64 (sin.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (sin.f64 b) (sin.f64 b)) (-.f64 (.f64 (sin.f64 b) (sin.f64 b)) (.f64 (sin.f64 b) (sin.f64 b))))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
▶	10.3%	(.f64 r (/.f64 (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	10.8%	(.f64 r (/.f64 (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	8.0%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (+.f64 (PI.f64) b))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	8.5%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (+.f64 (PI.f64) b))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	10.7%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (sin.f64 (+.f64 b (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
	8.7%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 #s(approx (- ( 1/2 (PI)) b) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	10.6%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 #s(approx (- ( 1/2 (PI)) b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	80.7%	(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 b) (sin.f64 b)))) (cos.f64 (+.f64 a b))))
	9.2%	(.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	7.4%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	80.7%	(.f64 r (/.f64 (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.6%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	69.3%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (sin.f64 a) (sin.f64 b)))))
	33.4%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (neg.f64 b) a) (-.f64 (neg.f64 b) a)) (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (-.f64 (neg.f64 b) a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))
	41.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64))))))
	12.8%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (- (neg b) (- a ( 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a)))))
	68.5%	(*.f64 r (/.f64 (sin.f64 b) (cos.f64 #s(approx (+ a b) b))))
	66.3%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))))
	53.0%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 a))))
	7.0%	(.f64 r (/.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	68.5%	(.f64 r (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))) (sin.f64 b)))
	7.8%	(.f64 r #s(approx (/ (/ (- (cos (- ( 1/2 (PI)) b)) (neg (sin b))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
	10.7%	(.f64 r #s(approx (/ (/ (- (cos (- ( 1/2 (PI)) b)) (neg (sin b))) 2) (cos (+ a b))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (cos.f64 b)))))
	37.2%	(.f64 r #s(approx (/ (sin b) (sin (- (neg b) (- a ( 1/2 (PI)))))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
▶	99.6%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (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)))))
	42.2%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
▶	42.3%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
▶	15.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b #s(approx r #s(literal 0 binary64))) #s(approx (cos a) #s(literal 1 binary64))))
	37.4%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (.f64 b r) (sin.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a))))
✓	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
	36.2%	#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)))))))
✓	37.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
	37.5%	#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))))
	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	50.1%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))

Compiler

Compiled 2 457 to 668 computations (72.8% saved)

series73.0ms (2.3%)

Memory

-5.0MiB live, 52.9MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1162	8248

Stop Event

1×	iter-limit

Counts

47 → 202

Calls

Call 1

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

Outputs
#s(approx r #s(literal 0 binary64))
#s(approx r r)
#s(approx (* r (sin b)) (*.f64 r (sin.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (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 (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b)))))
#s(approx (* b r) (*.f64 b r))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (sin.f64 (+.f64 a (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 r (sin.f64 b))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 a (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
#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 (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) (cos b)) (cos.f64 b))
#s(approx (* (cos a) (cos b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 b)))))
#s(approx (* (cos a) (cos b)) (+.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 a) (cos b)) (+.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 (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (.f64 a (sin.f64 b)))))
#s(approx (- (* (cos a) (cos b)) (* (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 a) (cos b)) (* (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 a) (cos b)) (* (sin a) (sin b)))) (/.f64 (*.f64 r (sin.f64 b)) (cos.f64 b)))
#s(approx (/ (* r (sin b)) (- (* (cos a) (cos b)) (* (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 a) (cos b)) (* (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 a) (cos b)) (* (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 (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (+.f64 (/.f64 (.f64 a (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (- a (* (PI) 1/2)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
#s(approx (- a (* (PI) 1/2)) (-.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ b (- a (* (PI) 1/2))) (-.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ b (- a (* (PI) 1/2))) (-.f64 (+.f64 a b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 #s(literal 1/2 binary64) (PI.f64))) b))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (.f64 #s(literal -1 binary64) (.f64 a (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (.f64 #s(literal -1/2 binary64) (.f64 a (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))) (.f64 #s(literal 1/6 binary64) (.f64 a (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))))
#s(approx (+ a (+ (* (PI) 1/2) b)) (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ a (+ (* (PI) 1/2) b)) (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (+.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (+.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 a (+.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 a (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (+.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 a (+.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 a (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 r (sin.f64 b))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (+.f64 (/.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 r (sin.f64 b))) (/.f64 (.f64 a (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 r (sin.f64 b)))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (+.f64 (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 a (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 r (sin.f64 b)))) (/.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 r (sin.f64 b))))) (/.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 r (sin.f64 b)))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (+.f64 (.f64 a (+.f64 (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 r (sin.f64 b)))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 a (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 r (sin.f64 b)))))) (/.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 r (sin.f64 b))))) (/.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 r (sin.f64 b)))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 r (.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b)))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 r (.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (+.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 r (.f64 (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 b))) (pow.f64 (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64))))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 2 binary64)) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (cos a) (cos.f64 a))
#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 b)) (*.f64 (cos.f64 a) (cos.f64 b)))
#s(approx (- (* (cos a) (cos b)) (* (sin a) (sin b))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (sin.f64 b))))
#s(approx (- a (* (PI) 1/2)) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) a)))))
#s(approx (+ b (- a (* (PI) 1/2))) (.f64 a (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)))))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (*.f64 #s(literal -1 binary64) a))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (.f64 a (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) (+.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))
#s(approx (+ a (+ (* (PI) 1/2) b)) (.f64 a (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) (/.f64 b a)))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (sin.f64 (+.f64 a (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 a b))))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal 1/2 binary64) (PI.f64))) b))))
#s(approx (- a (* (PI) 1/2)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) a)) #s(literal 1 binary64)))))
#s(approx (+ b (- a (* (PI) 1/2))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b) a))))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 #s(literal 1/2 binary64) (PI.f64))) b)))
#s(approx (+ a (+ (* (PI) 1/2) b)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))) a)) #s(literal 1 binary64)))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (sin.f64 (-.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) a))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (sin.f64 (-.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) a))) (*.f64 r (sin.f64 b))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) a)))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) a) (.f64 #s(literal 1/2 binary64) (PI.f64))) b)))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) a) (*.f64 #s(literal 1/2 binary64) (PI.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 b 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 (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- (* 1/2 (PI)) b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (- (* 1/2 (PI)) b) (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal 1/2 binary64) (PI.f64))))
#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 a) (cos b)) (+.f64 (cos.f64 a) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 a)))))
#s(approx (* (cos a) (cos b)) (+.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 a) (cos b)) (+.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 (- (* (cos a) (cos b)) (* (sin a) (sin b))) (+.f64 (cos.f64 a) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 a)))))
#s(approx (- (* (cos a) (cos b)) (* (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 a) (cos b)) (* (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 a) (cos b)) (* (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 a) (cos b)) (* (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 a) (cos b)) (* (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 (sin (- (* 1/2 (PI)) b)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (- (* 1/2 (PI)) b)) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 b (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (- (* 1/2 (PI)) b)) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (- (* 1/2 (PI)) b)) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))) (/.f64 (.f64 b r) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))) (.f64 b (+.f64 (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (.f64 b (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* r (sin b)) (sin (- (* 1/2 (PI)) 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (/.f64 r (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 b r) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (.f64 b (+.f64 (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 b (.f64 r (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (.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 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 r (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) (/.f64 r (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal 1/2 binary64) (PI.f64))) a))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (.f64 #s(literal -1 binary64) (.f64 b (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (.f64 #s(literal -1/2 binary64) (.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (+.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (.f64 #s(literal 1/6 binary64) (.f64 b (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (cos (+ (* (PI) 1/2) (neg (neg b)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (cos (+ (* (PI) 1/2) (neg (neg b)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (+ (* (PI) 1/2) (neg (neg b)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 b (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (+ (* (PI) 1/2) (neg (neg b)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 b (-.f64 (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) (-.f64 (.f64 b (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) (-.f64 (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (.f64 b (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) (-.f64 (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 b (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1/6 binary64))))))))))
#s(approx (+ a (+ (* (PI) 1/2) b)) (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (+.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (+.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (+.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 b (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (+.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (+.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 b r)))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (+.f64 (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r) (/.f64 (.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) r)) b))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (+.f64 (.f64 b (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)))) (/.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r))) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)) b))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (+.f64 (.f64 b (+.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)) (.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)) (+.f64 (.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)))) (/.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r))) (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r)) b))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 b r) (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (.f64 r (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 r (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (.f64 b (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 r (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 #s(literal -1/6 binary64) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (pow.f64 (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 r (cos.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 r (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (.f64 #s(literal 1/2 binary64) (.f64 b (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (.f64 #s(literal 1/2 binary64) (.f64 b (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 b (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (.f64 b (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 b (-.f64 (/.f64 (.f64 r (-.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1/6 binary64))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))) (/.f64 (.f64 r (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)))) (pow.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a)) #s(literal 2 binary64))))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a))))))))))
#s(approx (sin b) (sin.f64 b))
#s(approx (- (* 1/2 (PI)) b) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64))))
#s(approx (+ (* (PI) 1/2) b) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (+ b (- a (* (PI) 1/2))) (.f64 b (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)))))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (+.f64 #s(literal 1 binary64) (/.f64 a b)))))
#s(approx (cos (+ (* (PI) 1/2) (neg (neg b)))) (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (cos.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ a (+ (* (PI) 1/2) b)) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) b)) (/.f64 a b)))))
#s(approx (- (* 1/2 (PI)) b) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b))))))
#s(approx (sin (- (* 1/2 (PI)) b)) (sin.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (* r (sin b)) (sin (- (* 1/2 (PI)) b))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a))))
#s(approx (+ (* (PI) 1/2) b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) b)) #s(literal 1 binary64)))))
#s(approx (+ b (- a (* (PI) 1/2))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (neg (+ b (- a (* (PI) 1/2)))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) a) b))))))
#s(approx (sin (neg (+ b (- a (* (PI) 1/2))))) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal 1/2 binary64) (PI.f64))) a)))
#s(approx (cos (+ (* (PI) 1/2) (neg (neg b)))) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) b))))
#s(approx (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) (-.f64 (sin.f64 b) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 b) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -1 binary64) b))))))
#s(approx (+ a (+ (* (PI) 1/2) b)) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))) b)) #s(literal 1 binary64)))))
#s(approx (sin (+ a (+ (* (PI) 1/2) b))) (sin.f64 (-.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) b))))
#s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (sin.f64 (-.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) b))) (*.f64 r (sin.f64 b))))
#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sin.f64 b) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) b)))) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))) a)))))
#s(approx (* r (/ (/ (- (sin b) (cos (+ (* (PI) 1/2) (neg (neg b))))) 2) (sin (neg (+ b (- a (* (PI) 1/2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (-.f64 (sin.f64 b) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal -1 binary64) b))))) (sin.f64 (-.f64 (+.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal 1/2 binary64) (PI.f64))) a)))))
#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
5.0ms	r	0
5.0ms	b	0
4.0ms	a	inf
4.0ms	b	inf
3.0ms	b	-inf

rewrite142.0ms (4.5%)

Memory

3.0MiB live, 64.3MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	68	359
0	105	298
1	523	251
2	2355	245
0	5105	245

Stop Event

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

Counts

47 → 668

Calls

Call 1

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

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

eval75.0ms (2.4%)

Memory: 2.2MiB live, 67.0MiB allocated; 12ms collecting garbage
Compiler: Compiled 20 718 to 3 823 computations (81.5% saved)

prune44.0ms (1.4%)

Memory

-7.3MiB live, 49.3MiB allocated; 2ms collecting garbage

Pruning

76 alts after pruning (67 fresh and 9 done)

	Pruned	Kept	Total
New	715	17	732
Fresh	11	50	61
Picked	2	3	5
Done	0	6	6
Total	728	76	804

Accuracy

100.0%

Counts

804 → 76

Alt Table

Click to see full alt table

Status	Accuracy	Program
	68.5%	(/.f64 (*.f64 (sin.f64 b) r) (cos.f64 #s(approx (+ a b) b)))
	99.0%	(/.f64 #s(literal 1 binary64) (/.f64 (/.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)))))) (.f64 (sin.f64 b) r)))
	80.2%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 (+.f64 a b)) (sin.f64 b)) r))
	11.1%	(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 a (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64))) r)))
	36.6%	(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 a (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (.f64 #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)))))) r)))
	42.3%	(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 #s(approx (+ a (+ (* (PI) 1/2) b)) (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 b) r)))
	40.4%	(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 #s(approx (+ a (+ (* (PI) 1/2) b)) (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 b) r)))
	49.5%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 a b)) (.f64 #s(approx (sin b) (.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 b #s(literal 2 binary64)))))) r)))
	68.2%	(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 #s(approx (+ a b) b)) (*.f64 (sin.f64 b) r)))
	90.6%	(/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 b) r)) (/.f64 (.f64 (sin.f64 a) (sin.f64 b)) (.f64 (sin.f64 b) r))))
	39.2%	(/.f64 #s(literal 1 binary64) #s(approx (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r)) (/.f64 (+.f64 (/.f64 (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))) r) (/.f64 (.f64 b (cos.f64 (+.f64 a (*.f64 #s(literal 1/2 binary64) (PI.f64))))) r)) b)))
	50.3%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (/.f64 (+.f64 (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 a) r)) (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 a) r)) (*.f64 #s(literal -1/6 binary64) (/.f64 (cos.f64 a) r)))))) (/.f64 (cos.f64 a) r)) b)))
	51.9%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b (sin.f64 a)) r)) (/.f64 (cos.f64 a) r)) b)))
	49.8%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (/.f64 (cos.f64 a) (*.f64 b r))))
	64.5%	(/.f64 #s(literal 1 binary64) #s(approx (/ (cos (+ a b)) (* (sin b) r)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a r)) (/.f64 (cos.f64 b) (.f64 r (sin.f64 b))))))
	80.3%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 b) r)) #s(literal -1 binary64)))
	80.7%	(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 a b))) (.f64 (sin.f64 b) r))
	42.2%	(.f64 (.f64 (+.f64 (sin.f64 b) (sin.f64 b)) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 (-.f64 a (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)))) r))
	54.2%	(.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (sin.f64 b) (sin.f64 b)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b))) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (sin.f64 b) (sin.f64 b)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))))))
	68.5%	(.f64 (.f64 (sin.f64 b) r) (/.f64 #s(literal 1 binary64) (cos.f64 #s(approx (+ a b) b))))
	52.9%	(.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64))) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 (+.f64 (+.f64 (PI.f64) b) (PI.f64)))))))
	7.5%	(*.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	99.5%	(.f64 (sin.f64 b) (/.f64 r (/.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)))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b))))))
	99.4%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (+.f64 (.f64 (sin.f64 b) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 b) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 a) (sin.f64 b)))))
	57.1%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b))) (.f64 (sin.f64 a) (sin.f64 b)))))
✓	99.6%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	63.7%	(.f64 (sin.f64 b) (/.f64 r (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) #s(approx (* (sin a) (sin b)) (*.f64 b (sin.f64 a))))))
	99.6%	(.f64 (sin.f64 b) (/.f64 r (.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)))))
	42.6%	(.f64 (sin.f64 b) (/.f64 r (sin.f64 (+.f64 (fabs.f64 (+.f64 a b)) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
✓	80.7%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 (+.f64 a b))))
✓	68.5%	(*.f64 (sin.f64 b) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	50.7%	(.f64 (sin.f64 b) (/.f64 r #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)))))))
	53.0%	(.f64 (sin.f64 b) #s(approx (/ r (- ( (cos a) (cos b)) (* (sin a) (sin b)))) (/.f64 r (cos.f64 a))))
	9.7%	(.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (/.f64 r (cos.f64 (+.f64 a b))))
	9.5%	(.f64 (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64))) (/.f64 r (cos.f64 #s(approx (+ a b) b))))
	49.9%	(.f64 #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 (cos.f64 (+.f64 a b))))
	10.8%	(.f64 r (/.f64 (/.f64 (-.f64 (sin.f64 b) (cos.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	8.6%	(.f64 r (/.f64 (/.f64 (-.f64 (sin.f64 b) #s(approx (cos (+ ( (PI) 1/2) (neg (neg b)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	8.0%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 (+.f64 (PI.f64) b))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	10.7%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (sin.f64 (+.f64 b (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) a)))))
	6.3%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	17.0%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b)) (PI.f64))) (cos.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 b))))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	8.7%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 #s(approx (- ( 1/2 (PI)) b) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (sin.f64 (neg.f64 (+.f64 b (-.f64 a (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	10.6%	(.f64 r (/.f64 (/.f64 (-.f64 (cos.f64 #s(approx (- ( 1/2 (PI)) b) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (sin.f64 b))) #s(literal 2 binary64)) (cos.f64 (+.f64 a b))))
	80.7%	(*.f64 r (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 b) (sin.f64 b)))) (cos.f64 (+.f64 a b))))
	9.2%	(.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (sin.f64 (-.f64 (neg.f64 b) (-.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	7.4%	(*.f64 r (/.f64 (sin.f64 (+.f64 (neg.f64 b) (PI.f64))) (cos.f64 (+.f64 a b))))
	80.7%	(.f64 r (/.f64 (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.6%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) (cos.f64 a)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	69.3%	(.f64 r (/.f64 (sin.f64 b) (-.f64 (.f64 (cos.f64 b) #s(approx (cos a) #s(literal 1 binary64))) (*.f64 (sin.f64 a) (sin.f64 b)))))
	33.4%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (neg.f64 b) a) (-.f64 (neg.f64 b) a)) (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (-.f64 (neg.f64 b) a) (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))
	41.7%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 (-.f64 (+.f64 a b) (.f64 (PI.f64) #s(literal -1/2 binary64))))))
	12.8%	(.f64 r (/.f64 (sin.f64 b) (sin.f64 #s(approx (- (neg b) (- a ( 1/2 (PI)))) (*.f64 #s(literal -1 binary64) a)))))
	66.3%	(.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (+.f64 (cos.f64 b) (.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 b)))))))
	53.0%	(*.f64 r (/.f64 (sin.f64 b) #s(approx (cos (+ a b)) (cos.f64 a))))
	7.8%	(.f64 r #s(approx (/ (/ (- (cos (- ( 1/2 (PI)) b)) (neg (sin b))) 2) (sin (neg (+ b (- a (* (PI) 1/2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))))
	10.7%	(.f64 r #s(approx (/ (/ (- (cos (- ( 1/2 (PI)) b)) (neg (sin b))) 2) (cos (+ a b))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b)) (sin.f64 b)) (cos.f64 b)))))
	37.2%	(.f64 r #s(approx (/ (sin b) (sin (- (neg b) (- a ( 1/2 (PI)))))) (/.f64 b (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) a)))))
	42.5%	#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (+.f64 b (.f64 #s(literal 1/2 binary64) (PI.f64))))))
	37.4%	#s(approx (/ 1 (/ (sin (+ a (+ (* (PI) 1/2) b))) (* (sin b) r))) (/.f64 (.f64 b r) (sin.f64 (+.f64 a (.f64 #s(literal 1/2 binary64) (PI.f64))))))
	54.0%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (.f64 r (-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 b)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))) (-.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (sin.f64 a) (-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 b)) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 b)))))))
✓	99.6%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (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)))))
	69.3%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (.f64 r (sin.f64 b)) (-.f64 #s(approx ( (cos a) (cos b)) (cos.f64 b)) (*.f64 (sin.f64 a) (sin.f64 b)))))
	84.3%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (.f64 r (sin.f64 b)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 a) (cos.f64 b)) (.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))) (*.f64 (neg.f64 (sin.f64 a)) (sin.f64 b)))))
	42.2%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) a) b))))
	68.6%	#s(approx (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (tan.f64 b) r))
✓	42.3%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
	41.4%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (sin.f64 b)) (sin.f64 #s(approx (- ( 1/2 (PI)) b) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
	6.7%	#s(approx (* r (/ (sin b) (sin (- (neg b) (- a (* 1/2 (PI))))))) (/.f64 (.f64 r (cos.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) b) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) b))))
✓	15.0%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b #s(approx r #s(literal 0 binary64))) #s(approx (cos a) #s(literal 1 binary64))))
✓	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) (cos.f64 a)))
	36.2%	#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)))))))
✓	37.8%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (/.f64 (*.f64 b r) #s(approx (cos a) #s(literal 1 binary64))))
	37.5%	#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))))
	50.2%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))
	50.1%	#s(approx (* r (/ (sin b) (cos (+ a b)))) (.f64 r (.f64 b (/.f64 #s(literal 1 binary64) (cos.f64 a)))))

Compiler

Compiled 1 384 to 366 computations (73.6% saved)

regimes449.0ms (14.1%)

Memory

4.3MiB live, 229.8MiB allocated; 15ms collecting garbage

Counts

3 → 1

4 → 1

5 → 3

23 → 3

97 → 1

99 → 1

120 → 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 (*.f64 b #s(approx r #s(literal 0 binary64))) #s(approx (cos a) #s(literal 1 binary64))))

#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))))

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 (*.f64 b #s(approx r #s(literal 0 binary64))) #s(approx (cos a) #s(literal 1 binary64))))
#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 (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (tan.f64 b) r))

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

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 (*.f64 b #s(approx r #s(literal 0 binary64))) #s(approx (cos a) #s(literal 1 binary64))))
#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 (* (sin b) (/ r (- (* (cos a) (cos b)) (* (sin a) (sin b))))) (*.f64 (tan.f64 b) r))
#s(approx (* r (/ (sin b) (cos (+ a b)))) (*.f64 (/.f64 r (cos.f64 a)) b))

Outputs

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

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

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

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

Outputs

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

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

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

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

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

Outputs
#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)))))

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

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

Calls

30 calls:

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

Results

Accuracy	Segments	Branch
37.8%	1	`b`
37.8%	1	`r`
37.8%	1	`a`
37.8%	1	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
37.8%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
68.6%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
68.6%	1	`a`
68.6%	1	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
68.6%	1	`b`
80.9%	3	`b`
68.6%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
80.8%	3	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
68.6%	1	`r`
80.2%	3	`a`
80.9%	3	`b`
80.8%	1	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
80.8%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
80.8%	1	`r`
80.8%	1	`a`
80.8%	1	`b`
99.6%	1	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
99.6%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
99.6%	1	`r`
99.6%	1	`a`
99.6%	1	`b`
99.6%	1	`(/.f64 (sin.f64 b) (cos.f64 (+.f64 a b)))`
99.6%	1	`(*.f64 r (/.f64 (sin.f64 b) (cos.f64 (+.f64 a b))))`
99.6%	1	`r`
99.6%	1	`a`
99.6%	1	`b`

Compiler

Compiled 2 229 to 589 computations (73.6% saved)

bsearch46.0ms (1.4%)

Memory

-3.9MiB live, 11.5MiB allocated; 1ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
18.0ms	7.76697537510719e-16	2.3318375796412265e-12
24.0ms	-1581925250477525.0	-1.6168546464613962

Samples

27.0ms	192×	1	valid
5.0ms	96×	0	valid

Compiler

Compiled 192 to 192 computations (0.0% saved)

Precisions

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

ival-cos: 9.0ms (37.9% of total, 1.4 MiB)

ival-sin: 6.0ms (25.3% of total, 0.9 MiB)

adjust: 4.0ms (16.9% of total, 0.4 MiB)

ival-mult!: 2.0ms (8.4% of total, 0.3 MiB)

ival-div!: 2.0ms (8.4% of total, 0.3 MiB)

ival-add!: 1.0ms (4.2% of total, 0.3 MiB)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
0.0ms	7.76697537510719e-16	2.3318375796412265e-12
1.0ms	-1581925250477525.0	-1.6168546464613962

Compiler

Compiled 192 to 192 computations (0.0% saved)

derivations51.0ms (1.6%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 94 to 36 computations (61.7% saved)

preprocess42.0ms (1.3%)

Memory: 1.2MiB live, 56.4MiB allocated; 3ms collecting garbage
Compiler: Compiled 291 to 182 computations (37.5% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze210.0ms (6.6%)

sample1.2s (38.5%)

preprocess23.0ms (0.7%)

series26.0ms (0.8%)

rewrite116.0ms (3.6%)

eval15.0ms (0.5%)

prune11.0ms (0.3%)

series72.0ms (2.2%)

rewrite144.0ms (4.5%)

eval77.0ms (2.4%)

prune34.0ms (1.1%)

series61.0ms (1.9%)

rewrite131.0ms (4.1%)

eval77.0ms (2.4%)

prune39.0ms (1.2%)

series73.0ms (2.3%)

rewrite142.0ms (4.5%)

eval75.0ms (2.4%)

prune44.0ms (1.4%)

regimes449.0ms (14.1%)

bsearch46.0ms (1.4%)

bsearch1.0ms (0.0%)

derivations51.0ms (1.6%)

preprocess42.0ms (1.3%)

end0.0ms (0.0%)

Profiling