Metrics for Toniolo and Linder, Equation (3b), real

start0.0ms (0.0%)

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

analyze0.0ms (0.0%)

Memory

0.1MiB live, 0.1MiB allocated; 0ms 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
100.0%	99.9%	0.0%	0.1%	0.0%	0.0%	0.0%	1

Compiler

Compiled 18 to 14 computations (22.2% saved)

sample1.2s (25.5%)

Memory

11.3MiB live, 334.2MiB allocated; 24ms collecting garbage

Samples

962.0ms	8 255×	0	valid
0.0ms	1×	1	valid

Precisions

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

ival-sin: 513.0ms (69.1% of total, 79.7 MiB)

ival-pow2: 80.0ms (10.8% of total, 20.6 MiB)

ival-sqrt: 58.0ms (7.8% of total, 10.6 MiB)

ival-mult!: 34.0ms (4.6% of total, 5.8 MiB)

ival-div!: 32.0ms (4.3% of total, 4.6 MiB)

ival-add!: 19.0ms (2.6% of total, 4.4 MiB)

adjust: 7.0ms (0.9% of total, 1.3 MiB)

Bogosity

preprocess41.0ms (0.9%)

Memory

-15.4MiB live, 7.9MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	46	166
1	142	163
2	566	163
3	3361	163

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	92.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 32 to 26 computations (18.8% saved)

series37.0ms (0.8%)

Memory

1.2MiB live, 23.4MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	419	3019

Stop Event

1×	iter-limit

Counts

13 → 64

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

Outputs
#s(approx ky #s(literal 0 binary64))
#s(approx kx kx)
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx ky ky)
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx th th)
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (sin th) (sin.f64 th))

Calls

9 calls:

Time	Variable	Point
4.0ms	ky	0
2.0ms	kx	0
2.0ms	kx	inf
2.0ms	ky	inf
1.0ms	th	inf

rewrite114.0ms (2.4%)

Memory

0.4MiB live, 54.5MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	13	66
0	22	66
1	69	66
2	216	66
3	1080	66
0	4302	66

Stop Event

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

Counts

13 → 471

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

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

eval55.0ms (1.1%)

Memory: 1.4MiB live, 48.3MiB allocated; 7ms collecting garbage
Compiler: Compiled 16 760 to 3 284 computations (80.4% saved)

prune14.0ms (0.3%)

Memory

2.9MiB live, 18.6MiB allocated; 1ms collecting garbage

Pruning

22 alts after pruning (22 fresh and 0 done)

	Pruned	Kept	Total
New	502	22	524
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	503	22	525

Accuracy

96.5%

Counts

525 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	71.4%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
	70.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
	23.8%	(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
	7.9%	(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
	71.5%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
	71.2%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
	71.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
▶	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	79.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	68.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
▶	53.3%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
▶	92.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	38.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	44.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	71.4%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
▶	71.2%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
	71.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	39.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	89.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
	46.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
▶	38.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))

Compiler

Compiled 880 to 234 computations (73.4% saved)

series70.0ms (1.4%)

Memory

0.2MiB live, 46.7MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1099	9773

Stop Event

1×	iter-limit

Counts

47 → 190

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
th
(sin.f64 th)
#s(literal 1 binary64)
#s(literal 1/2 binary64)
#s(literal -1 binary64)
(pow.f64 ky #s(literal 2 binary64))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(*.f64 ky (sin.f64 th))
(/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 kx) #s(literal -1 binary64))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 th) (sin.f64 ky))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))

Outputs
#s(approx ky #s(literal 0 binary64))
#s(approx kx kx)
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 ky (sin.f64 th)))) (.f64 ky (sin.f64 th))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 ky (sin.f64 th)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th)))))) (.f64 #s(literal -1/6 binary64) (.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 ky (sin.f64 th)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 ky (sin.f64 th))) (+.f64 (.f64 #s(literal 1/720 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th))))))))) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th)))))) (.f64 #s(literal -1/6 binary64) (.f64 ky (sin.f64 th)))))) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (+ kx kx)) #s(literal 1 binary64))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- 1 (cos (+ kx kx))) (*.f64 #s(literal 2 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 4/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 4/45 binary64) (.f64 #s(literal -2/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (pow (sin kx) -1) (/.f64 #s(literal 1 binary64) kx))
#s(approx (pow (sin kx) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))) kx))
#s(approx (pow (sin kx) -1) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal 7/360 binary64) (pow.f64 kx #s(literal 2 binary64)))))) kx))
#s(approx (pow (sin kx) -1) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (pow.f64 kx #s(literal 2 binary64)))))))) kx))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (sqrt (pow (sin kx) 2)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(approx (* (- 1 (cos (+ kx kx))) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (pow (sin kx) -1) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (cos (+ kx kx)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (* (- 1 (cos (+ kx kx))) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx ky ky)
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (* ky (sin th)) (*.f64 ky (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (+ ky ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* (sin th) (sin ky)) (.f64 ky (+.f64 (sin.f64 th) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))))))
#s(approx (* (sin th) (sin ky)) (.f64 ky (+.f64 (sin.f64 th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))))))))
#s(approx (* (sin th) (sin ky)) (.f64 ky (+.f64 (sin.f64 th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (sin.f64 th)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (pow (sin kx) 1) (pow (sin kx) -1)) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 ky (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) (sin.f64 th)))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (* (cos (+ ky ky)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))))
#s(approx th th)
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* ky (sin th)) (*.f64 ky th))
#s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) ky) (.f64 #s(literal 1/120 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))))
#s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 ky (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
#s(approx (* (sin th) (sin ky)) (.f64 th (+.f64 (sin.f64 ky) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))))))
#s(approx (* (sin th) (sin ky)) (.f64 th (+.f64 (sin.f64 ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))))))))
#s(approx (* (sin th) (sin ky)) (.f64 th (+.f64 (sin.f64 ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))) (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sin th) (sin.f64 th))

Calls

9 calls:

Time	Variable	Point
5.0ms	ky	0
4.0ms	kx	0
4.0ms	kx	inf
3.0ms	kx	-inf
3.0ms	th	inf

rewrite143.0ms (3.0%)

Memory

0.9MiB live, 73.0MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	56	452
0	96	419
1	407	386
2	1515	340
0	4200	340

Stop Event

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

Counts

47 → 1 215

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
th
(sin.f64 th)
#s(literal 1 binary64)
#s(literal 1/2 binary64)
#s(literal -1 binary64)
(pow.f64 ky #s(literal 2 binary64))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(*.f64 ky (sin.f64 th))
(/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 kx) #s(literal -1 binary64))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 th) (sin.f64 ky))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))

Outputs
ky
(sin.f64 ky)
kx
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (sin.f64 kx))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (sin.f64 kx))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (sin.f64 kx))
(*.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal 0 binary64)))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal -1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 kx)) #s(literal 2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (sin.f64 kx) #s(literal 1 binary64))
(sin.f64 kx)
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(+.f64 (sin.f64 kx) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
#s(literal 2 binary64)
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 0 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal -1 binary64))
(pow.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal -2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (sin.f64 kx)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 kx) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (cos.f64 (-.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (neg.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (sin.f64 kx)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (sin.f64 kx) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(neg.f64 (/.f64 (sin.f64 kx) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 ky ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
th
(sin.f64 th)
#s(literal 1 binary64)
#s(literal 1/2 binary64)
#s(literal -1 binary64)
(*.f64 (neg.f64 (fabs.f64 ky)) (neg.f64 (fabs.f64 ky)))
(*.f64 (fabs.f64 (fabs.f64 ky)) (fabs.f64 (fabs.f64 ky)))
(*.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky)))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal 1 binary64)))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) ky)
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 (pow.f64 ky (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 ky (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 ky ky)
(pow.f64 (fabs.f64 ky) #s(literal 2 binary64))
(pow.f64 (neg.f64 ky) #s(literal 2 binary64))
(pow.f64 ky #s(literal 2 binary64))
(/.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 ky #s(literal -2 binary64)))
(fabs.f64 (*.f64 ky ky))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 (sqrt.f64 (fabs.f64 (sin.f64 kx))) (sqrt.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 (sin.f64 kx)))) (sqrt.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (fabs.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 th) ky)
(*.f64 ky (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky)
(.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky))
(.f64 (.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal 1 binary64))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 kx kx) (.f64 (neg.f64 kx) (neg.f64 kx))) (+.f64 kx (neg.f64 kx)))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 kx) #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (+.f64 (.f64 (neg.f64 kx) (neg.f64 kx)) (*.f64 kx (neg.f64 kx)))))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (-.f64 (.f64 kx kx) (*.f64 kx kx))))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(-.f64 kx (neg.f64 kx))
(+.f64 kx (neg.f64 (neg.f64 kx)))
(+.f64 kx kx)
(*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 kx) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sin.f64 kx))))) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 kx)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 kx kx))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 kx)))
(sin.f64 (+.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))
(-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) kx) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 kx kx) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (fabs.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 kx kx))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (neg.f64 (cos.f64 (+.f64 kx kx))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (neg.f64 (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(neg.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (sin.f64 kx))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (sin.f64 kx))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (sin.f64 kx))
(*.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal 0 binary64)))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal -1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 kx)) #s(literal 2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (sin.f64 kx) #s(literal 1 binary64))
(sin.f64 kx)
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(+.f64 (sin.f64 kx) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 0 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal -1 binary64))
(pow.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal -2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (sin.f64 kx)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 kx) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (cos.f64 (-.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (neg.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (sin.f64 kx)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (sin.f64 kx) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(neg.f64 (/.f64 (sin.f64 kx) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (sin.f64 kx))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 kx)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 0 binary64) (sin.f64 kx)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 0 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal -1 binary64))
(pow.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal -2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (sin.f64 kx)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 kx) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (cos.f64 (-.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (neg.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (sin.f64 kx)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (sin.f64 kx) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(neg.f64 (/.f64 (sin.f64 kx) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 ky) #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (+.f64 (.f64 ky ky) (*.f64 ky (neg.f64 ky)))))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (+.f64 ky (neg.f64 ky)))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 ky ky))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 ky #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (-.f64 (.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(-.f64 ky (neg.f64 ky))
(+.f64 ky (neg.f64 (neg.f64 ky)))
(+.f64 ky ky)
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 ky ky)))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))
(sin.f64 (+.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) ky))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky)))))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) ky) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 ky ky) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (+.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))
(pow.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 kx) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sin.f64 kx))))) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 kx)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64)) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)))))
(-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(sqrt.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(fabs.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(fabs.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 #s(literal -2 binary64) (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 #s(literal 2 binary64) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (/.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (/.f64 #s(literal 0 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))
(pow.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 kx) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sin.f64 kx))))) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 kx)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64)) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)))))
(-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(sqrt.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(fabs.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sin.f64 ky))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1/2 binary64))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)))
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64))) (+.f64 (.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 th ky)))) #s(literal 4 binary64))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64)) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64)) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64)) #s(literal 4 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal -4 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 4 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 4 binary64))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 th ky)) (cos.f64 (-.f64 ky th))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) #s(literal 2 binary64)))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)) (sin.f64 ky))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 1 binary64)))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (neg.f64 (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(-.f64 (/.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (/.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) (/.f64 (cos.f64 (+.f64 th ky)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(+.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))
(pow.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 kx) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sin.f64 kx))))) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 kx)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 (+.f64 (.f64 (.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64)) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (sin.f64 kx) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)))))
(-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(sqrt.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(fabs.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(fabs.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)) (sin.f64 ky))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 1 binary64)))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (neg.f64 (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(-.f64 (/.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (/.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) (/.f64 (cos.f64 (+.f64 th ky)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(+.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (neg.f64 (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(fabs.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)) (sin.f64 ky))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 1 binary64)))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))))) (neg.f64 (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(-.f64 (/.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (/.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) (/.f64 (cos.f64 (+.f64 th ky)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(+.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(approx (pow (sin ky) 2) (.f64 ky ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (+.f64 (.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (-.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (neg.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(/.f64 (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(/.f64 (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))) (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))) (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
(neg.f64 (-.f64 (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky))))
(sqrt.f64 (.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal -1 binary64) (sin.f64 kx))) (neg.f64 (sin.f64 kx)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx))))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(-.f64 (/.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (/.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (/.f64 (cos.f64 (+.f64 th ky)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(+.f64 (/.f64 (cos.f64 (-.f64 ky th)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))

eval106.0ms (2.2%)

Memory: 10.6MiB live, 99.7MiB allocated; 12ms collecting garbage
Compiler: Compiled 37 997 to 5 902 computations (84.5% saved)

prune38.0ms (0.8%)

Memory

-10.8MiB live, 42.3MiB allocated; 4ms collecting garbage

Pruning

45 alts after pruning (45 fresh and 0 done)

	Pruned	Kept	Total
New	1 142	34	1 176
Fresh	6	11	17
Picked	5	0	5
Done	0	0	0
Total	1 153	45	1 198

Accuracy

99.8%

Counts

1 198 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	71.3%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
	43.2%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
	70.4%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
	71.2%	(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
	23.8%	(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
	7.9%	(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
	71.5%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
	71.2%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
	71.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
	44.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
	31.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
	26.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
▶	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	79.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	32.2%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
	38.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	44.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	44.9%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
▶	37.3%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	25.7%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	34.9%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	71.1%	(.f64 (.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	71.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
	71.4%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
	44.8%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
	41.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
▶	89.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
	11.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	46.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
	31.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
▶	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
	28.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
	31.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
	30.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
	18.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
	19.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	40.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
	43.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
	43.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	43.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
▶	20.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
	25.7%	#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
	37.3%	#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))

Compiler

Compiled 1 524 to 382 computations (74.9% saved)

series84.0ms (1.7%)

Memory

5.1MiB live, 57.6MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1343	12322

Stop Event

1×	iter-limit

Counts

47 → 244

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
th
(sin.f64 th)
#s(literal 1 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 ky (sin.f64 th))
(*.f64 th (sin.f64 ky))
(fabs.f64 (sin.f64 kx))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 ky (sin.f64 th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))

Outputs
#s(approx ky #s(literal 0 binary64))
#s(approx kx kx)
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (+ kx kx)) #s(literal 1 binary64))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- 1 (cos (+ kx kx))) (*.f64 #s(literal 2 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 4/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 4/45 binary64) (.f64 #s(literal -2/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (* (cos (+ kx kx)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ kx kx)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (* (cos (+ kx kx)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ kx kx)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 ky (sin.f64 th)))) (.f64 ky (sin.f64 th))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 ky (sin.f64 th)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th)))))) (.f64 #s(literal -1/6 binary64) (.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 ky (sin.f64 th)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 ky (sin.f64 th))) (+.f64 (.f64 #s(literal 1/720 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th))))))))) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th)))))) (.f64 #s(literal -1/6 binary64) (.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ 1 (fabs (sin kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(approx (* (cos (+ kx kx)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
#s(approx (* (- 1 (cos (+ kx kx))) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (cos (+ kx kx)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (* (cos (+ kx kx)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))
#s(approx (* (- 1 (cos (+ kx kx))) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx ky ky)
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (* (sin ky) (sin th)) (*.f64 ky (sin.f64 th)))
#s(approx (* (sin ky) (sin th)) (.f64 ky (+.f64 (sin.f64 th) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))))))
#s(approx (* (sin ky) (sin th)) (.f64 ky (+.f64 (sin.f64 th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))))))))
#s(approx (* (sin ky) (sin th)) (.f64 ky (+.f64 (sin.f64 th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (sin.f64 th)))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* th (sin ky)) (*.f64 ky th))
#s(approx (* th (sin ky)) (.f64 ky (+.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) th)))))
#s(approx (* th (sin ky)) (.f64 ky (+.f64 th (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) th) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) th)))))))
#s(approx (* th (sin ky)) (.f64 ky (+.f64 th (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) th)) (*.f64 #s(literal 1/120 binary64) th))))))))
#s(approx (+ ky ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- 1 (cos (+ ky ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 4/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 4/45 binary64) (.f64 #s(literal -2/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (sin ky) (sin th)) (*.f64 (sin.f64 ky) (sin.f64 th)))
#s(approx (* th (sin ky)) (*.f64 th (sin.f64 ky)))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (- 1 (cos (+ ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (- 1 (cos (+ ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))
#s(approx (* (- 1 (cos (+ ky ky))) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (* (cos (+ ky ky)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))
#s(approx (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))))
#s(approx (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx th th)
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (sin ky) (sin th)) (.f64 th (+.f64 (sin.f64 ky) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))))))
#s(approx (* (sin ky) (sin th)) (.f64 th (+.f64 (sin.f64 ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))))))))
#s(approx (* (sin ky) (sin th)) (.f64 th (+.f64 (sin.f64 ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))) (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) ky) (.f64 #s(literal 1/120 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))))
#s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 ky (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (*.f64 #s(literal 1/120 binary64) (/.f64 ky kx)))))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))))))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sin th) (sin.f64 th))

Calls

9 calls:

Time	Variable	Point
5.0ms	ky	0
5.0ms	kx	inf
4.0ms	ky	-inf
4.0ms	ky	inf
4.0ms	kx	0

rewrite133.0ms (2.8%)

Memory

0.3MiB live, 66.6MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	60	474
0	100	400
1	415	375
2	1703	375
0	4088	375

Stop Event

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

Counts

47 → 1 100

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
th
(sin.f64 th)
#s(literal 1 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 ky (sin.f64 th))
(*.f64 th (sin.f64 ky))
(fabs.f64 (sin.f64 kx))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 ky (sin.f64 th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))

Outputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 kx))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(pow.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(/.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (cos.f64 (-.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(/.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(sqrt.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(neg.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
th
(sin.f64 th)
#s(literal 1 binary64)
#s(literal 1/2 binary64)
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 ky th) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 ky th) (+.f64 th ky)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 th ky)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 th ky)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))))
(-.f64 (/.f64 (cos.f64 (-.f64 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 th ky)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) #s(literal 2 binary64)))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 ky th) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 ky th) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -2 binary64))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (.f64 (sin.f64 th) (sin.f64 ky))))
(neg.f64 (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(+.f64 (/.f64 (cos.f64 (-.f64 th ky)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (neg.f64 ky) #s(literal 1 binary64)) (/.f64 (sin.f64 th) #s(literal -1 binary64)))
(*.f64 (/.f64 (sin.f64 th) #s(literal -1 binary64)) (/.f64 ky #s(literal -1 binary64)))
(*.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (/.f64 (/.f64 ky #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (/.f64 ky #s(literal 1 binary64)))
(*.f64 (/.f64 ky #s(literal 1 binary64)) (/.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 ky #s(literal 1 binary64)) (/.f64 (sin.f64 th) #s(literal 1 binary64)))
(.f64 (.f64 (sin.f64 th) ky) #s(literal 1 binary64))
(*.f64 (sin.f64 th) (/.f64 ky #s(literal 1 binary64)))
(*.f64 (sin.f64 th) ky)
(*.f64 ky (/.f64 (sin.f64 th) #s(literal 1 binary64)))
(*.f64 ky (sin.f64 th))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) #s(literal 1 binary64))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) #s(literal -1 binary64))
(/.f64 (*.f64 (sin.f64 th) ky) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)))
(*.f64 th (sin.f64 ky))
(*.f64 (sin.f64 ky) th)
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (fabs.f64 (sin.f64 kx))) (sqrt.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (fabs.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 0 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(fabs.f64 (*.f64 (sin.f64 kx) #s(literal -1 binary64)))
(fabs.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64)))
(fabs.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 #s(literal -1 binary64) (sin.f64 kx)))
(fabs.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 #s(literal 1 binary64) (sin.f64 kx)))
(fabs.f64 (/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(fabs.f64 (/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(fabs.f64 (/.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(fabs.f64 (/.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(fabs.f64 (/.f64 (sin.f64 kx) #s(literal -1 binary64)))
(fabs.f64 (/.f64 (sin.f64 kx) #s(literal 1 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (fabs.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 kx kx) (.f64 (neg.f64 kx) (neg.f64 kx))) (+.f64 kx (neg.f64 kx)))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 kx) #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (+.f64 (.f64 (neg.f64 kx) (neg.f64 kx)) (*.f64 kx (neg.f64 kx)))))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (-.f64 (.f64 kx kx) (*.f64 kx kx))))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(-.f64 kx (neg.f64 kx))
(+.f64 kx (neg.f64 (neg.f64 kx)))
(+.f64 kx kx)
(*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 kx kx))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 kx)))
(sin.f64 (+.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))
(-.f64 (.f64 (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) kx) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 kx kx) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (fabs.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 kx kx))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (neg.f64 (cos.f64 (+.f64 kx kx))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (neg.f64 (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(neg.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 kx))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(pow.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(/.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (cos.f64 (-.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(/.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(sqrt.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 ky ky) (.f64 (neg.f64 ky) (neg.f64 ky))) (+.f64 ky (neg.f64 ky)))
(/.f64 (-.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 ky) #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (+.f64 (.f64 (neg.f64 ky) (neg.f64 ky)) (*.f64 ky (neg.f64 ky)))))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 ky ky))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 ky #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (-.f64 (.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(-.f64 ky (neg.f64 ky))
(+.f64 ky (neg.f64 (neg.f64 ky)))
(+.f64 ky ky)
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 ky ky)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))
(sin.f64 (+.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) ky))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) ky) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 ky ky) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 ky ky))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (+.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(neg.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(pow.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)) #s(literal -1 binary64))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 0 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (+.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(neg.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 th ky) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (-.f64 ky th) (+.f64 th ky)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 ky th) (+.f64 th ky)) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) #s(literal -2 binary64))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal -2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal -2 binary64))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (.f64 (sin.f64 th) (sin.f64 ky))))
(neg.f64 (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(+.f64 (/.f64 (cos.f64 (-.f64 th ky)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) (/.f64 (neg.f64 (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 th) kx) ky)
(.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))
(.f64 (.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal -1 binary64) kx))
(.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) kx))
(.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) kx)))
(*.f64 (sin.f64 th) (/.f64 ky kx))
(*.f64 ky (/.f64 (sin.f64 th) kx))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (neg.f64 ky) (sin.f64 th))) (*.f64 (neg.f64 kx) #s(literal -1 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) ky)) (*.f64 (neg.f64 kx) #s(literal 1 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 ky) (sin.f64 th))) (.f64 (.f64 #s(literal 1 binary64) kx) #s(literal -1 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 ky) (sin.f64 th))) (*.f64 kx #s(literal -1 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) ky)) (.f64 (.f64 #s(literal 1 binary64) kx) #s(literal 1 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) ky)) (*.f64 kx #s(literal 1 binary64)))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (neg.f64 kx)))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal 1 binary64) kx)))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) (*.f64 #s(literal -1 binary64) kx))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th)))) (neg.f64 (neg.f64 (neg.f64 kx))))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 kx)))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (neg.f64 kx)))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 kx))
(/.f64 (.f64 (sin.f64 th) ky) (.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) kx)))
(/.f64 (.f64 (sin.f64 th) ky) (.f64 #s(literal 1 binary64) kx))
(/.f64 (*.f64 (sin.f64 th) ky) kx)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (neg.f64 kx)))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 (sin.f64 th) ky) kx))
(.f64 #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
(/.f64 (.f64 #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))) #s(literal -1 binary64))
(/.f64 (neg.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))) #s(literal -1 binary64))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) #s(literal 1 binary64))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 0 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal -2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 2 binary64) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(sqrt.f64 (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (sin.f64 kx)))
(fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(fabs.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 0 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (fabs.f64 (sin.f64 kx))) (sqrt.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (fabs.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 0 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(pow.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(fabs.f64 (*.f64 (sin.f64 kx) #s(literal -1 binary64)))
(fabs.f64 (*.f64 (sin.f64 kx) #s(literal 1 binary64)))
(fabs.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 #s(literal -1 binary64) (sin.f64 kx)))
(fabs.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 #s(literal 1 binary64) (sin.f64 kx)))
(fabs.f64 (/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(fabs.f64 (/.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(fabs.f64 (/.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(fabs.f64 (/.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(fabs.f64 (/.f64 (sin.f64 kx) #s(literal -1 binary64)))
(fabs.f64 (/.f64 (sin.f64 kx) #s(literal 1 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (fabs.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 ky #s(literal -1 binary64)) (/.f64 (neg.f64 (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 ky #s(literal -1 binary64)) (/.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 ky #s(literal -1 binary64)) (/.f64 (sin.f64 th) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (neg.f64 ky) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (/.f64 ky #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 th) #s(literal -1 binary64)) (/.f64 (neg.f64 ky) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 (sin.f64 th) #s(literal -1 binary64)) (/.f64 (/.f64 ky #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 th) #s(literal -1 binary64)) (/.f64 ky (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (/.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (/.f64 (sin.f64 th) #s(literal 1 binary64)))
(.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (/.f64 (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (/.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (/.f64 (/.f64 ky #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 (sin.f64 th) #s(literal 1 binary64)) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 ky #s(literal 1 binary64)) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(.f64 (.f64 (*.f64 (sin.f64 th) ky) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (/.f64 ky #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 ky #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky)
(.f64 (.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky))
(.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 (.f64 (*.f64 (sin.f64 th) ky) #s(literal -1 binary64)) #s(literal -1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(/.f64 (.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (.f64 (neg.f64 ky) (sin.f64 th))) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 (neg.f64 (.f64 (neg.f64 ky) (sin.f64 th))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (.f64 (neg.f64 (.f64 (neg.f64 ky) (sin.f64 th))) #s(literal 2 binary64)) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (.f64 (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)) #s(literal -1 binary64))
(/.f64 (.f64 (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (neg.f64 ky) (sin.f64 th))) #s(literal 1 binary64))
(/.f64 (.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (neg.f64 ky) (sin.f64 th))) (fabs.f64 (sin.f64 kx)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (sin.f64 th) ky)) (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (neg.f64 ky) (sin.f64 th))) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal -1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 (.f64 (neg.f64 ky) (sin.f64 th)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal 2 binary64)) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64))) (fabs.f64 (sin.f64 kx)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th)))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (fabs.f64 (sin.f64 kx)))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 (sin.f64 th) ky) kx)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal 2 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 #s(literal -1 binary64) #s(approx ( (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky)))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))

eval101.0ms (2.1%)

Memory: 9.1MiB live, 98.3MiB allocated; 13ms collecting garbage
Compiler: Compiled 33 689 to 5 501 computations (83.7% saved)

prune50.0ms (1.0%)

Memory

-4.7MiB live, 53.0MiB allocated; 6ms collecting garbage

Pruning

61 alts after pruning (59 fresh and 2 done)

	Pruned	Kept	Total
New	1 097	36	1 133
Fresh	17	23	40
Picked	3	2	5
Done	0	0	0
Total	1 117	61	1 178

Accuracy

99.8%

Counts

1 178 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.3%	(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
	43.2%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
	36.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
	37.3%	(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	23.8%	(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
	7.9%	(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
	71.2%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
	71.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
▶	44.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
▶	31.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
	26.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
▶	79.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	32.2%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
	33.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	35.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	38.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	44.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	44.9%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
	37.2%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	16.6%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
	37.3%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	25.7%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	14.6%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	34.9%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	18.2%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	71.1%	(.f64 (.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	71.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	44.8%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
	25.7%	#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
	37.3%	#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
	41.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	71.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
	50.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
	46.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
	31.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
✓	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
	20.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
	28.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
	13.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
	40.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
	28.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
	31.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
	18.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
	71.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
	43.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
	43.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
▶	43.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
	20.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
	20.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
	13.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
✓	20.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
	20.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
	23.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
	20.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
	23.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
▶	14.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
	16.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))

Compiler

Compiled 1 940 to 527 computations (72.8% saved)

series88.0ms (1.8%)

Memory

1.4MiB live, 64.1MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1376	13086

Stop Event

1×	iter-limit

Counts

47 → 236

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
th
(sin.f64 th)
#s(literal 1 binary64)
(pow.f64 kx #s(literal 2 binary64))
#s(literal 1/2 binary64)
(fabs.f64 (sin.f64 kx))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))))
(*.f64 ky th)
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 ky ky)
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 ky th) kx)
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))

Outputs
#s(approx ky #s(literal 0 binary64))
#s(approx kx kx)
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (+ kx kx)) #s(literal 1 binary64))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- (cos (+ kx kx)) 1) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- (cos (+ kx kx)) 1) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (- (cos (+ kx kx)) 1) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (- (cos (+ kx kx)) 1) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/315 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 4/45 binary64))))) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (pow kx 2)) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (* (- (cos (+ kx kx)) 1) 1/2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (* (- (cos (+ kx kx)) 1) 1/2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (* (- (cos (+ kx kx)) 1) 1/2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/315 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/45 binary64))))) #s(literal 1 binary64))))
#s(approx (/ 1 (fabs (sin kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (* ky (/ 1 (fabs (sin kx)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (* (sin th) (* ky (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (* ky th) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 ky (sin.f64 th)))) (.f64 ky (sin.f64 th))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 ky (sin.f64 th)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th)))))) (.f64 #s(literal -1/6 binary64) (.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (.f64 ky (sin.f64 th)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 ky (sin.f64 th))) (+.f64 (.f64 #s(literal 1/720 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th))))))))) (+.f64 (.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th))) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th)))))) (.f64 #s(literal -1/6 binary64) (.f64 ky (sin.f64 th)))))) kx))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (- (cos (+ kx kx)) 1) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (+ 1/2 (pow kx 2)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (* (- (cos (+ kx kx)) 1) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (- (cos (+ kx kx)) 1) (-.f64 (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 1 binary64)))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))))
#s(approx (* (- (cos (+ kx kx)) 1) 1/2) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))) #s(literal 1 binary64))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))) #s(literal 1 binary64))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))) #s(literal 1 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 1 binary64)))))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx ky ky)
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ ky ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- 1 (cos (+ ky ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 4/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 4/45 binary64) (.f64 #s(literal -2/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (/ 2 (- 1 (cos (+ ky ky)))) (/.f64 #s(literal 1 binary64) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (/ 2 (- 1 (cos (+ ky ky)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (/ 2 (- 1 (cos (+ ky ky)))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/15 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (/ 2 (- 1 (cos (+ ky ky)))) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/15 binary64) (*.f64 #s(literal 2/189 binary64) (pow.f64 ky #s(literal 2 binary64)))))))) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (/ 1 (/ 2 (- 1 (cos (+ ky ky))))) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (/ 1 (/ 2 (- 1 (cos (+ ky ky))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (/ 1 (/ 2 (- 1 (cos (+ ky ky))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (/ 1 (/ 2 (- 1 (cos (+ ky ky))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* ky th) (*.f64 ky th))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (-.f64 (pow.f64 ky #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))
#s(approx (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (+.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (+.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))))
#s(approx (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2))) (+.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (/.f64 ky (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 ky (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (.f64 ky (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (- 1 (cos (+ ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (* (cos (+ ky ky)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
#s(approx (/ 2 (- 1 (cos (+ ky ky)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (- 1 (cos (+ ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))
#s(approx (* (cos (+ ky ky)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))
#s(approx (/ 2 (- 1 (cos (+ ky ky)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))
#s(approx (/ 1 (/ 2 (- 1 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky))))))) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx th th)
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (/ 1 (/ 2 (- 1 (cos (+ ky ky)))))))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
#s(approx (* (sin th) (* ky (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx))))
#s(approx (* (sin th) (* ky (/ 1 (fabs (sin kx))))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (* (sin th) (* ky (/ 1 (fabs (sin kx))))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (* (sin th) (* ky (/ 1 (fabs (sin kx))))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))))))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (*.f64 #s(literal 1/120 binary64) (/.f64 ky kx)))))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 th (+.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sin th) (sin.f64 th))

Calls

9 calls:

Time	Variable	Point
6.0ms	ky	0
5.0ms	kx	inf
5.0ms	ky	inf
4.0ms	th	inf
4.0ms	ky	-inf

rewrite130.0ms (2.7%)

Memory

0.6MiB live, 65.0MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	65	500
0	103	480
1	450	460
2	1554	421
0	4101	419

Stop Event

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

Counts

47 → 791

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
th
(sin.f64 th)
#s(literal 1 binary64)
(pow.f64 kx #s(literal 2 binary64))
#s(literal 1/2 binary64)
(fabs.f64 (sin.f64 kx))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))))
(*.f64 ky th)
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 ky ky)
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 ky th) kx)
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))

Outputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 kx))
(*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (cos.f64 (-.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64)))
(+.f64 (/.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
th
(sin.f64 th)
#s(literal 1 binary64)
(*.f64 (neg.f64 (fabs.f64 kx)) (neg.f64 (fabs.f64 kx)))
(*.f64 (fabs.f64 (fabs.f64 kx)) (fabs.f64 (fabs.f64 kx)))
(*.f64 (neg.f64 (neg.f64 kx)) (neg.f64 (neg.f64 kx)))
(*.f64 (pow.f64 kx #s(literal 1 binary64)) (pow.f64 kx #s(literal 1 binary64)))
(*.f64 (pow.f64 kx #s(literal 1 binary64)) kx)
(*.f64 (fabs.f64 kx) (fabs.f64 kx))
(*.f64 (pow.f64 kx (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 kx (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 kx) (neg.f64 kx))
(*.f64 kx kx)
(pow.f64 (fabs.f64 kx) #s(literal 2 binary64))
(pow.f64 (neg.f64 kx) #s(literal 2 binary64))
(pow.f64 kx #s(literal 2 binary64))
(/.f64 (pow.f64 kx #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) kx))
(/.f64 #s(literal 1 binary64) (pow.f64 kx #s(literal -2 binary64)))
(fabs.f64 (*.f64 kx kx))
(exp.f64 (*.f64 (log.f64 kx) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (fabs.f64 (sin.f64 kx))) (sqrt.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(sqrt.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (fabs.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 kx) #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (+.f64 (.f64 kx kx) (*.f64 (neg.f64 kx) kx))))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (+.f64 kx (neg.f64 kx)))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (-.f64 (.f64 kx kx) (*.f64 kx kx))))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(-.f64 kx (neg.f64 kx))
(+.f64 kx (neg.f64 (neg.f64 kx)))
(+.f64 kx kx)
(*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))) (cos.f64 (-.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 kx kx))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 kx)))
(sin.f64 (+.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))
(-.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) kx) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 kx kx) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (fabs.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 kx kx))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 kx kx)))) (cos.f64 (+.f64 kx kx)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (cos.f64 (+.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (+.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))
(neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64)))
(-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))
(+.f64 #s(literal -1 binary64) (cos.f64 (+.f64 kx kx)))
(+.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 ky) #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (+.f64 (.f64 ky ky) (*.f64 ky (neg.f64 ky)))))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (+.f64 ky (neg.f64 ky)))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 ky ky))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 ky #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (-.f64 (.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(-.f64 ky (neg.f64 ky))
(+.f64 ky (neg.f64 (neg.f64 ky)))
(+.f64 ky ky)
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -4 binary64))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal -4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 ky ky)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))
(sin.f64 (+.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) ky))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) ky) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 ky ky) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))
(*.f64 (/.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) #s(literal 2 binary64)) (/.f64 (-.f64 (cos.f64 ky) (sin.f64 ky)) #s(literal 1 binary64)))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal -2 binary64))
(/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64))
(*.f64 #s(literal -2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal -1 binary64))) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(neg.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -1 binary64)))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))))
(*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 #s(literal -2 binary64) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal -4 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (.f64 #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -4 binary64))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) #s(literal 4 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) #s(literal 4 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal -4 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))))
(/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal -2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 ky ky)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal -2 binary64)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) (.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal -4 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -4 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 2 binary64))) (neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1 binary64)) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))
(-.f64 (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal -2 binary64))) (sqrt.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(.f64 (pow.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal -2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64))) (fabs.f64 (sin.f64 ky)))
(pow.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (sqrt.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 kx kx))) (*.f64 kx kx))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 kx) kx) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 kx kx) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 kx kx) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 kx kx) (.f64 kx kx)) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (*.f64 kx kx) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 kx kx) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (+.f64 (.f64 (.f64 kx kx) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 kx kx) (.f64 kx kx)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 kx kx) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (neg.f64 kx) kx) (.f64 (neg.f64 kx) kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 kx) kx)))
(/.f64 (+.f64 (pow.f64 (.f64 kx kx) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (*.f64 kx kx) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 kx) kx) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (neg.f64 kx) kx) (.f64 (neg.f64 kx) kx)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 kx) kx)))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 kx kx) (.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 kx kx)))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 kx kx) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 kx kx) (.f64 kx kx)) (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 kx) kx) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 kx) kx))
(-.f64 (*.f64 kx kx) #s(literal -1/2 binary64))
(+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 kx) kx)))
(+.f64 #s(literal 1/2 binary64) (*.f64 kx kx))
(+.f64 (*.f64 kx kx) #s(literal 1/2 binary64))
#s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (*.f64 kx kx) #s(literal -1/2 binary64)))
(*.f64 th ky)
(*.f64 ky th)
(.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1/2 binary64))
(+.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 ky))) (neg.f64 (neg.f64 (fabs.f64 ky))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 ky))) (neg.f64 (neg.f64 (neg.f64 ky))))
(*.f64 (pow.f64 (fabs.f64 ky) #s(literal 1 binary64)) (pow.f64 (fabs.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 ky) #s(literal 1 binary64)) (fabs.f64 ky))
(*.f64 (pow.f64 (neg.f64 ky) #s(literal 1 binary64)) (pow.f64 (neg.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 ky) #s(literal 1 binary64)) (neg.f64 ky))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 ky ky))
(*.f64 (pow.f64 ky (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 ky (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 ky)) (neg.f64 (fabs.f64 ky)))
(*.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky)))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal 1 binary64)))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) ky)
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(.f64 (.f64 ky ky) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 ky ky)
(pow.f64 (neg.f64 (fabs.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 ky)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 ky) #s(literal 2 binary64))
(pow.f64 (neg.f64 ky) #s(literal 2 binary64))
(pow.f64 (*.f64 ky ky) #s(literal 1 binary64))
(pow.f64 ky #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 ky) #s(literal 1 binary64)) (pow.f64 (fabs.f64 ky) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 ky) #s(literal 1 binary64)) (pow.f64 (neg.f64 ky) #s(literal -1 binary64)))
(/.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 ky) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 ky) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 ky #s(literal -2 binary64)))
(neg.f64 (*.f64 ky (neg.f64 ky)))
(neg.f64 (*.f64 (neg.f64 ky) ky))
(sqrt.f64 (.f64 (.f64 ky ky) (*.f64 ky ky)))
(fabs.f64 (neg.f64 (*.f64 ky ky)))
(fabs.f64 (*.f64 ky (neg.f64 ky)))
(fabs.f64 (*.f64 (neg.f64 ky) ky))
(fabs.f64 (*.f64 ky ky))
(exp.f64 (*.f64 (log.f64 (fabs.f64 ky)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 ky)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(pow.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))) #s(literal -1 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal -1/2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (fabs.f64 (sin.f64 kx))))
(neg.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx)))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 kx))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(fabs.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))))
(+.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 0 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) ky)
(*.f64 #s(literal 1 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 ky #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) ky)) (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (neg.f64 (*.f64 ky #s(literal -1 binary64))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) ky)) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 ky #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 #s(literal -1 binary64) ky) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (neg.f64 ky) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (+.f64 ky ky) (*.f64 #s(literal 2 binary64) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))
(/.f64 ky (fabs.f64 (sin.f64 kx)))
(.f64 (.f64 (*.f64 (sin.f64 th) ky) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky)
(.f64 (.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky))
(*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
(*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal 1 binary64))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (.f64 (.f64 (sin.f64 th) ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(approx (pow (sin ky) 2) (.f64 ky ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(approx (pow (sin ky) 2) (.f64 ky ky)))
(.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (+.f64 (.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))
(-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 (.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(approx (pow (sin ky) 2) (.f64 ky ky)))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (*.f64 kx kx) #s(literal -1/2 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (*.f64 kx kx) #s(literal -1/2 binary64))))
(.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(pow.f64 (.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64)))) (+.f64 (.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (*.f64 kx kx) #s(literal -1/2 binary64)))))
(-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (neg.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.f64 (.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(fabs.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (*.f64 kx kx) #s(literal -1/2 binary64))))
(+.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sqrt.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (/.f64 th kx) ky)
(.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 th ky))
(.f64 (.f64 (neg.f64 ky) th) (/.f64 #s(literal -1 binary64) kx))
(.f64 (.f64 th ky) (/.f64 #s(literal 1 binary64) kx))
(.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx)))
(*.f64 th (/.f64 ky kx))
(*.f64 ky (/.f64 th kx))
(/.f64 (neg.f64 (.f64 (.f64 th ky) #s(literal 1 binary64))) (neg.f64 kx))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 ky) th))) (neg.f64 (neg.f64 (neg.f64 kx))))
(/.f64 (.f64 (.f64 th ky) #s(literal 1 binary64)) kx)
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) th)) (neg.f64 (neg.f64 kx)))
(/.f64 (*.f64 (neg.f64 ky) th) (neg.f64 kx))
(/.f64 (*.f64 th ky) kx)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) (*.f64 (neg.f64 ky) th)))
(/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky)))
(neg.f64 (/.f64 (*.f64 th ky) (neg.f64 kx)))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) th) kx))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 th ky) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 th ky) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 th ky) kx))))

eval263.0ms (5.5%)

Memory: -89.7MiB live, 100.4MiB allocated; 104ms collecting garbage
Compiler: Compiled 34 305 to 6 109 computations (82.2% saved)

prune51.0ms (1.1%)

Memory

0.7MiB live, 58.1MiB allocated; 2ms collecting garbage

Pruning

64 alts after pruning (59 fresh and 5 done)

	Pruned	Kept	Total
New	1 069	24	1 093
Fresh	19	35	54
Picked	2	3	5
Done	0	2	2
Total	1 090	64	1 154

Accuracy

99.8%

Counts

1 154 → 64

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.3%	(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
	30.9%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
	36.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
	37.3%	(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	23.8%	(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
	7.9%	(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
	71.2%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
	71.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
✓	44.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
	16.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
	32.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
	26.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
	71.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	38.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	34.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
	44.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	37.2%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	37.3%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	25.7%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	14.6%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	34.9%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	18.2%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
	71.1%	(.f64 (.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 ky)))
	31.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	71.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	31.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
	43.8%	#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
	25.7%	#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
	37.3%	#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
	41.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	71.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
	50.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
	31.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
✓	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
	40.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
	31.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
	18.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
	71.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
	43.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
	43.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
	43.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
✓	43.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
	22.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
	30.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
	13.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
	42.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
	43.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
	20.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
	20.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
✓	20.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
	23.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
	20.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
	23.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
	13.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
✓	14.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
	14.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
	16.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))

Compiler

Compiled 970 to 270 computations (72.2% saved)

regimes1.5s (30.3%)

Memory

-5.3MiB live, 759.3MiB allocated; 42ms collecting garbage

Counts

6 → 1

7 → 1

10 → 1

17 → 2

20 → 1

37 → 1

39 → 3

45 → 4

52 → 3

57 → 3

72 → 3

75 → 6

78 → 6

80 → 6

103 → 3

104 → 3

110 → 3

111 → 3

114 → 2

116 → 2

117 → 2

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))

Call 2

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Call 3

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))

Call 4

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))

Call 5

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))

Call 6

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

Call 7

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Call 8

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))

Outputs
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Call 9

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))

Call 10

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))

Call 11

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))

Call 12

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))

Outputs
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Call 13

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))

Outputs
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Call 14

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))

Outputs
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))

Call 15

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))

Call 16

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))

Call 17

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))

Call 18

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))

Call 19

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

Call 20

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))

Outputs

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))

Call 21

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (/.f64 ky kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 (/.f64 th kx) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) th) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (.f64 ky (/.f64 #s(literal 1 binary64) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (/ 1 (/ 1 (fabs (sin kx))))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (.f64 th (+.f64 ky (.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 #s(approx (cos (+ kx kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) #s(approx (* th (sin ky)) (*.f64 ky th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx ky #s(literal 0 binary64)) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) #s(approx (+ 1/2 (pow kx 2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (* (cos (+ ky ky)) 1/2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (* (- (cos (+ kx kx)) 1) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (- 1/2 (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- ( (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 th (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ 1 (sqrt (- 1/2 (- (* (cos (+ ky ky)) 1/2) (* (- 1 (cos (+ kx kx))) 1/2))))) (* (sin th) (sin ky))) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) 1/2) (-.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- (pow (sin ky) 2) ( (- (cos (+ kx kx)) 1) 1/2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (pow (sin ky) 2) (* (- (cos (+ kx kx)) 1) 1/2)))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- ( (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 ky ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 th) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (.f64 ky (*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))) #s(approx ( (sin th) (sin ky)) (*.f64 th (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

Outputs

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))

Calls

108 calls:

29.0ms	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
29.0ms	th
28.0ms	(sin.f64 th)
28.0ms	(sin.f64 kx)
28.0ms	kx

Results

Accuracy	Segments	Branch
17.1%	1	`(sin.f64 ky)`
17.1%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
17.1%	1	`(sin.f64 th)`
17.1%	1	`(sin.f64 kx)`
17.1%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
17.1%	1	`th`
17.1%	1	`kx`
17.1%	1	`ky`
17.1%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
23.1%	1	`(sin.f64 ky)`
23.1%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
23.1%	1	`(sin.f64 th)`
23.1%	1	`(sin.f64 kx)`
23.1%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
23.1%	1	`kx`
23.1%	1	`ky`
23.1%	1	`th`
23.1%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
23.2%	1	`(sin.f64 th)`
23.2%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
23.2%	1	`ky`
23.2%	1	`(sin.f64 ky)`
23.2%	1	`th`
23.2%	1	`(sin.f64 kx)`
23.2%	1	`kx`
23.2%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
27.0%	2	`th`
23.2%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
27.8%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
27.4%	3	`(sin.f64 th)`
28.8%	3	`(sin.f64 kx)`
28.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
26.3%	2	`(sin.f64 ky)`
28.7%	2	`kx`
26.3%	2	`ky`
43.7%	1	`th`
43.7%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
43.7%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
43.7%	1	`(sin.f64 th)`
43.7%	1	`(sin.f64 kx)`
43.7%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
43.7%	1	`(sin.f64 ky)`
43.7%	1	`kx`
43.7%	1	`ky`
43.8%	1	`(sin.f64 ky)`
43.8%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
43.8%	1	`ky`
43.8%	1	`(sin.f64 kx)`
43.8%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
43.8%	1	`kx`
43.8%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
49.4%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
46.9%	2	`(sin.f64 ky)`
48.0%	2	`ky`
43.8%	1	`(sin.f64 th)`
55.5%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
43.8%	1	`th`
50.4%	3	`(sin.f64 kx)`
63.6%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
49.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
50.4%	2	`kx`
59.0%	4	`(sin.f64 ky)`
59.1%	3	`ky`
69.8%	3	`ky`
71.4%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
70.4%	4	`(sin.f64 ky)`
70.4%	3	`ky`
76.1%	3	`ky`
60.1%	5	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
59.6%	3	`(sin.f64 th)`
78.4%	6	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
85.8%	6	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
85.8%	6	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
68.6%	4	`th`
67.3%	3	`(sin.f64 kx)`
67.2%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
67.2%	2	`kx`
76.4%	4	`(sin.f64 ky)`
85.8%	6	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
76.4%	3	`ky`
92.7%	3	`ky`
93.6%	4	`(sin.f64 ky)`
79.5%	4	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
80.0%	3	`(sin.f64 th)`
83.7%	3	`(sin.f64 kx)`
83.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
83.7%	2	`kx`
80.0%	2	`th`
95.3%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
93.6%	3	`ky`
95.4%	3	`ky`
95.7%	4	`(sin.f64 ky)`
92.8%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
95.2%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
95.7%	3	`ky`
95.7%	2	`ky`
95.3%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
95.7%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
96.2%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
92.0%	1	`(sin.f64 th)`
92.0%	1	`(sin.f64 kx)`
92.0%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
95.7%	3	`(sin.f64 ky)`
96.2%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
96.2%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
92.0%	1	`kx`
95.7%	2	`ky`
92.0%	1	`th`

Compiler

Compiled 2 437 to 861 computations (64.7% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch6.0ms (0.1%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
5.0ms	5.1789841321673566e-170	5.892659990575665e-170

Samples

4.0ms

32×

valid

Compiler

Compiled 67 to 58 computations (13.4% saved)

Precisions

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

ival-sin: 2.0ms (69.7% of total, 0.3 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.0 MiB)

ival-sqrt: 0.0ms (0.0% of total, 0.0 MiB)

ival-pow2: 0.0ms (0.0% of total, 0.1 MiB)

ival-div!: 0.0ms (0.0% of total, 0.0 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.0 MiB)

bsearch17.0ms (0.3%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
15.0ms	1.4277847317381675e-33	1.381734759382106e-29
0.0ms	5.1789841321673566e-170	5.892659990575665e-170

Samples

12.0ms

80×

valid

Compiler

Compiled 220 to 188 computations (14.5% saved)

Precisions

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

ival-sin: 7.0ms (73.3% of total, 0.7 MiB)

ival-sqrt: 1.0ms (10.5% of total, 0.1 MiB)

ival-pow2: 1.0ms (10.5% of total, 0.2 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.0 MiB)

ival-div!: 0.0ms (0.0% of total, 0.0 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.1 MiB)

bsearch20.0ms (0.4%)

Memory

-2.3MiB live, 5.5MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
18.0ms	1.1332999521205143e-9	4.541177665037383e-8
0.0ms	5.1789841321673566e-170	5.892659990575665e-170

Samples

13.0ms

112×

valid

Compiler

Compiled 324 to 275 computations (15.1% saved)

Precisions

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

ival-sin: 7.0ms (71.1% of total, 1.0 MiB)

ival-sqrt: 1.0ms (10.2% of total, 0.1 MiB)

ival-pow2: 1.0ms (10.2% of total, 0.3 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.1 MiB)

ival-div!: 0.0ms (0.0% of total, 0.1 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.1 MiB)

bsearch23.0ms (0.5%)

Memory

-1.1MiB live, 6.5MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.1332999521205143e-9	4.541177665037383e-8
20.0ms	5.6629225889804926e-157	2.2673879275217585e-153

Samples

15.0ms

128×

valid

Compiler

Compiled 462 to 401 computations (13.2% saved)

Precisions

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

ival-sin: 8.0ms (71.5% of total, 1.2 MiB)

ival-sqrt: 1.0ms (8.9% of total, 0.2 MiB)

ival-pow2: 1.0ms (8.9% of total, 0.3 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.1 MiB)

ival-div!: 0.0ms (0.0% of total, 0.1 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.1 MiB)

bsearch22.0ms (0.5%)

Memory

-1.0MiB live, 6.6MiB allocated; 1ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
20.0ms	4.541177665037383e-8	8.327465839384663e-5
1.0ms	5.6629225889804926e-157	2.2673879275217585e-153

Samples

14.0ms

128×

valid

Compiler

Compiled 563 to 480 computations (14.7% saved)

Precisions

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

ival-sin: 7.0ms (64.0% of total, 1.1 MiB)

ival-sqrt: 1.0ms (9.1% of total, 0.2 MiB)

ival-pow2: 1.0ms (9.1% of total, 0.3 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.1 MiB)

ival-div!: 0.0ms (0.0% of total, 0.1 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.1 MiB)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf
0.0ms	0.9802221914125834	0.9910550662113962
0.0ms	5.049149416103856e-8	0.09855396917530465
0.0ms	-0.3710244826130504	-0.3676667672526374
0.0ms	-0.9991325172481045	-0.9965629447226275

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf
0.0ms	0.9802221914125834	0.9910550662113962
0.0ms	5.049149416103856e-8	0.09855396917530465
0.0ms	-0.3710244826130504	-0.3676667672526374
0.0ms	-0.9991325172481045	-0.9965629447226275

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf
0.0ms	0.9802221914125834	0.9910550662113962
0.0ms	5.049149416103856e-8	0.09855396917530465
0.0ms	-0.3710244826130504	-0.3676667672526374
0.0ms	-0.9991325172481045	-0.9965629447226275

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch20.0ms (0.4%)

Memory

-2.8MiB live, 5.8MiB allocated; 1ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
18.0ms	1.4053391426611892	308.9786225749012
1.0ms	5.6629225889804926e-157	2.2673879275217585e-153

Samples

13.0ms

112×

valid

Compiler

Compiled 473 to 404 computations (14.6% saved)

Precisions

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

ival-sin: 6.0ms (63.2% of total, 1.0 MiB)

ival-sqrt: 1.0ms (10.5% of total, 0.1 MiB)

ival-pow2: 1.0ms (10.5% of total, 0.3 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.1 MiB)

ival-div!: 0.0ms (0.0% of total, 0.1 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.1 MiB)

bsearch14.0ms (0.3%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.1332999521205143e-9	4.541177665037383e-8
11.0ms	2.7354841440308134e-93	6.401810435789536e-93

Samples

8.0ms

80×

valid

Compiler

Compiled 356 to 308 computations (13.5% saved)

Precisions

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

ival-sin: 4.0ms (64.4% of total, 0.6 MiB)

ival-sqrt: 1.0ms (16.1% of total, 0.1 MiB)

ival-pow2: 1.0ms (16.1% of total, 0.2 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.0 MiB)

ival-div!: 0.0ms (0.0% of total, 0.0 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.1 MiB)

bsearch2.0ms (0.0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.4053391426611892	308.9786225749012
1.0ms	2.7354841440308134e-93	6.401810435789536e-93

Compiler

Compiled 356 to 296 computations (16.9% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf
0.0ms	0.7214100310706903	0.7219561209969525
0.0ms	-0.18026587352094625	-0.12268363433268926

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch1.0ms (0.0%)

Memory

-7.5MiB live, 0.3MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf
0.0ms	0.7214100310706903	0.7219561209969525

Compiler

Compiled 31 to 25 computations (19.4% saved)

bsearch0.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.9378820585231796e-31	1.8032139639190174e-26

Compiler

Compiled 22 to 19 computations (13.6% saved)

derivations229.0ms (4.8%)

Memory

4.2MiB live, 12.1MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 190 to 182 computations (84.7% saved)

preprocess248.0ms (5.1%)

Memory: 2.8MiB live, 256.3MiB allocated; 11ms collecting garbage
Symmetry: (abs kx)
Compiler: Compiled 12 247 to 5 307 computations (56.7% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze0.0ms (0.0%)

sample1.2s (25.5%)

preprocess41.0ms (0.9%)

series37.0ms (0.8%)

rewrite114.0ms (2.4%)

eval55.0ms (1.1%)

prune14.0ms (0.3%)

series70.0ms (1.4%)

rewrite143.0ms (3.0%)

eval106.0ms (2.2%)

prune38.0ms (0.8%)

series84.0ms (1.7%)

rewrite133.0ms (2.8%)

eval101.0ms (2.1%)

prune50.0ms (1.0%)

series88.0ms (1.8%)

rewrite130.0ms (2.7%)

eval263.0ms (5.5%)

prune51.0ms (1.1%)

regimes1.5s (30.3%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch6.0ms (0.1%)

bsearch17.0ms (0.3%)

bsearch20.0ms (0.4%)

bsearch23.0ms (0.5%)

bsearch22.0ms (0.5%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch20.0ms (0.4%)

bsearch14.0ms (0.3%)

bsearch2.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch0.0ms (0.0%)

derivations229.0ms (4.8%)

preprocess248.0ms (5.1%)

end0.0ms (0.0%)

Profiling