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

start0.0ms (0.0%)

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

analyze229.0ms (2.8%)

Memory

-11.4MiB live, 461.3MiB allocated; 99ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	0
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	1
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	2
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	3
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	4
25.0%	25.0%	74.9%	0.1%	0.0%	0.0%	0.0%	5
43.8%	43.7%	56.2%	0.1%	0.0%	0.0%	0.0%	6
43.8%	43.7%	56.2%	0.1%	0.0%	0.0%	0.0%	7
53.1%	53.0%	46.8%	0.1%	0.0%	0.0%	0.0%	8
60.9%	60.8%	39.0%	0.1%	0.0%	0.0%	0.0%	9
60.9%	60.8%	39.0%	0.1%	0.0%	0.0%	0.0%	10
64.8%	64.7%	35.1%	0.1%	0.0%	0.0%	0.0%	11
68.4%	68.3%	31.6%	0.1%	0.0%	0.0%	0.0%	12

Compiler

Compiled 18 to 14 computations (22.2% saved)

sample1.6s (19.1%)

Memory

57.9MiB live, 2 502.4MiB allocated; 447ms collecting garbage

Samples

1.2s

8 256×

valid

Precisions

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

ival-sin: 600.0ms (65.8% of total)

ival-pow2: 160.0ms (17.5% of total)

ival-sqrt: 59.0ms (6.5% of total)

ival-mult!: 39.0ms (4.3% of total)

ival-div!: 34.0ms (3.7% of total)

ival-add!: 19.0ms (2.1% of total)

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess49.0ms (0.6%)

Memory

-8.3MiB live, 43.7MiB allocated; 17ms 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
▶	93.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))

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 32 to 26 computations (18.8% saved)

sample0.0ms (0.0%)

Memory

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

Calls

Call 1

Inputs
2

Outputs
#s(literal 2 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 3 to 3 computations (0.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series49.0ms (0.6%)

Memory

26.0MiB live, 70.3MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	417	2956

Stop Event

1×	iter-limit

Counts

13 → 63

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 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)) (fma.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)) (fma.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)) (fma.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)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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)))) (fma.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)))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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)))) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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)) (fma.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)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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)) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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)) (fma.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)) (fma.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)) (fma.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)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (fma.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))))) (fma.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 (fma.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))))))) (fma.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 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (fma.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))))) (fma.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))) (fma.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))))) (fma.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 (fma.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)))))) (fma.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 (fma.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))))))) (fma.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 (fma.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 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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))))) (fma.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 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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 (fma.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))))) (fma.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))) (fma.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))))) (fma.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))))))))) (fma.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 (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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
5.0ms	th	-inf
5.0ms	ky	0
4.0ms	kx	0
4.0ms	kx	inf
3.0ms	ky	-inf

rewrite175.0ms (2.1%)

Memory

-8.3MiB live, 238.8MiB allocated; 46ms 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	49

Stop Event

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

Counts

13 → 595

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

eval95.0ms (1.1%)

Memory: -12.2MiB live, 175.3MiB allocated; 24ms collecting garbage
Compiler: Compiled 17 666 to 3 769 computations (78.7% saved)

prune28.0ms (0.3%)

Memory

12.7MiB live, 58.7MiB allocated; 4ms collecting garbage

Pruning

17 alts after pruning (17 fresh and 0 done)

	Pruned	Kept	Total
New	630	17	647
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	631	17	648

Accuracy

100.0%

Counts

648 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	94.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	94.2%	(/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 th) (sin.f64 ky))))
	99.7%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
▶	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	74.4%	(*.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))
	74.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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)))) (sin.f64 th))
	74.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.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))
	45.5%	(*.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))
▶	53.7%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	42.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))
	38.7%	(*.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))
	94.8%	(.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 (sin.f64 th) (sin.f64 ky)))
	99.6%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
▶	99.5%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
	33.7%	(*.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))
	45.8%	#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))))))
▶	33.0%	#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 640 to 518 computations (19.1% saved)

sample0.0ms (0.0%)

Memory

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

Calls

Call 1

Inputs
2
-1

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

Samples

0.0ms

1×

valid

Compiler

Compiled 4 to 4 computations (0.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series144.0ms (1.7%)

Memory

-6.9MiB live, 430.3MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	738	4968

Stop Event

1×	iter-limit

Counts

30 → 111

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(*.f64 ky (sin.f64 th))
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.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)))))
(pow.f64 kx #s(literal 2 binary64))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (sin.f64 th) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))

Outputs
#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 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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 (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 (fma.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 (fma.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)) (fma.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 (fma.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)) (fma.f64 #s(literal -1/5040 binary64) (.f64 ky (sin.f64 th)) (fma.f64 #s(literal 1/720 binary64) (.f64 ky (sin.f64 th)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th)) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th))))))))) (fma.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 (+ (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)) (fma.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)) (fma.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 (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.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 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 #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 (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)))))))) (fma.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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (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)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 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))) (fma.f64 #s(literal 1/4 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 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 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))))))))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (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 (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 (+ (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 (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (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 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 ky (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 ky (fma.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))))) (fma.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 (fma.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))))))) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (fma.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))))) (fma.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))) (fma.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))))) (fma.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 (fma.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)))))) (fma.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 (fma.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))))))) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 ky (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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))))) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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 (fma.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))))) (fma.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))) (fma.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))))) (fma.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))))))))) (fma.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 (sin th)) (*.f64 ky (sin.f64 th)))
#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)) (fma.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)) (fma.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 (* (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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 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 (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 #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 (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.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/4 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 5 binary64)))))))) (fma.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 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 (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 #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 (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (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)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (pow.f64 ky #s(literal 2 binary64)) (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (pow.f64 ky #s(literal 2 binary64)) (fma.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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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 5 binary64))) (.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))))))))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) (sin.f64 th)))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) (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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 th (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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 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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) ky (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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 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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 th #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 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (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/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (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
27.0ms	ky	-inf
14.0ms	kx	inf
12.0ms	ky	0
7.0ms	kx	0
5.0ms	th	inf

rewrite180.0ms (2.2%)

Memory

11.5MiB live, 426.9MiB allocated; 59ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	39	219
0	68	211
1	260	204
2	1142	204
0	4173	204

Stop Event

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

Counts

30 → 821

Calls

Call 1

Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(*.f64 ky (sin.f64 th))
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.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)))))
(pow.f64 kx #s(literal 2 binary64))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (sin.f64 th) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))

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

eval96.0ms (1.2%)

Memory: 26.5MiB live, 251.2MiB allocated; 51ms collecting garbage
Compiler: Compiled 22 762 to 3 562 computations (84.4% saved)

prune101.0ms (1.2%)

Memory

-8.7MiB live, 168.5MiB allocated; 88ms collecting garbage

Pruning

46 alts after pruning (44 fresh and 2 done)

	Pruned	Kept	Total
New	696	40	736
Fresh	8	4	12
Picked	5	0	5
Done	-2	2	0
Total	707	46	753

Accuracy

100.0%

Counts

753 → 46

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	94.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	55.1%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
	42.6%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
	46.7%	(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	99.7%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	51.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
	74.4%	(*.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))
	74.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64)))) (sin.f64 th))
▶	29.4%	(*.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))
	42.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))
	38.7%	(*.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))
	55.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
	99.6%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
	43.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
	43.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
	99.5%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
	43.2%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
	99.5%	(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (neg.f64 (sin.f64 th)))))
	51.2%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
	42.6%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
▶	38.6%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
	47.8%	(.f64 (neg.f64 (sin.f64 ky)) #s(approx ( (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
	50.7%	(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
	35.2%	#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))))
	45.8%	#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))))))
	25.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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
	20.8%	#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)))))
	17.2%	#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 #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(literal 2 binary64)))))
	17.3%	#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 #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(literal 2 binary64)))))
	24.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
	25.1%	#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 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
	25.2%	#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)))))))
	11.6%	#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
	18.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
	17.4%	#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))))))
	17.3%	#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) (.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)))))))))
▶	17.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	17.8%	#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)))))
	34.6%	#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))))
	37.5%	#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))
	35.2%	#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)))
	37.5%	#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)))))
	37.5%	#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))))))
▶	19.7%	#s(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)))

Compiler

Compiled 2 384 to 1 806 computations (24.2% saved)

sample2.0ms (0.0%)

Memory

-45.5MiB live, 0.6MiB allocated; 3ms collecting garbage

Calls

Call 1

Inputs
1
-1/6
2
-1

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

Samples

0.0ms

1×

valid

Compiler

Compiled 6 to 6 computations (0.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series90.0ms (1.1%)

Memory

18.9MiB live, 155.5MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	808	5989

Stop Event

1×	iter-limit

Counts

40 → 132

Calls

Call 1

Inputs
th
(sin.f64 th)
kx
(sin.f64 kx)
ky
(sin.f64 ky)
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(*.f64 ky (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 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(literal 1 binary64)
#s(literal -1/6 binary64)
#s(literal 2 binary64)
(pow.f64 th #s(literal 2 binary64))
(*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))
(.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 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
(.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)))))))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.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))))))) (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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(pow.f64 kx #s(literal 2 binary64))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
(pow.f64 ky #s(literal 2 binary64))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
(+.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))))
(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)))))
(/.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))))))
(*.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))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))

Outputs
#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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 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 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 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))) (fma.f64 #s(literal 1/4 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 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 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)))))))) (fma.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 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 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 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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 (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (fma.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 (fma.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)) (fma.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 (fma.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)) (fma.f64 #s(literal -1/5040 binary64) (.f64 ky (sin.f64 th)) (fma.f64 #s(literal 1/720 binary64) (.f64 ky (sin.f64 th)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th)) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th))))))))) (fma.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 (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)) (fma.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)) (fma.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 (/ (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)))) (fma.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)))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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)))) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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 (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))
#s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))
#s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -7/360 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) kx))
#s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -31/15120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) kx))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.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 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 #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 (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)))))))) (fma.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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (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)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 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))) (fma.f64 #s(literal 1/4 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 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 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))))))))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin 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) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.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 (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 (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 (+ (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 (/ (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 (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin 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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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 5 binary64))) (.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)))))))) (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 ky (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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))))) (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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 (fma.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))))) (fma.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))) (fma.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))))) (fma.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))))))))) (fma.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 (sin th)) (*.f64 ky (sin.f64 th)))
#s(approx (pow 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)) (fma.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)) (fma.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 (/ (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 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (fma.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))))) (fma.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 (fma.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))))))) (fma.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 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (fma.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))))) (fma.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))) (fma.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))))) (fma.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 (fma.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)))))) (fma.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 (fma.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))))))) (fma.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 (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 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 (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 #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 (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.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/4 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 5 binary64)))))))) (fma.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 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 (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 #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 (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (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)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (pow.f64 ky #s(literal 2 binary64)) (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (pow.f64 ky #s(literal 2 binary64)) (fma.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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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 5 binary64))) (.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))))))))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) (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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 th #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 #s(literal 1 binary64) (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) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (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) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (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/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (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) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 th (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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 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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) ky (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 ky kx) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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 (pow th 2) (pow.f64 th #s(literal 2 binary64)))
#s(approx (* -1/6 (pow th 2)) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/6 (pow th 2))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1/6 (pow th 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 th #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 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (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/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (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))
#s(approx (+ 1 (* -1/6 (pow th 2))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (* th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64))))
#s(approx (* th (+ 1 (* -1/6 (pow th 2)))) (*.f64 (pow.f64 th #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (* th (+ 1 (* -1/6 (pow th 2)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 th #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 th #s(literal 2 binary64)))))))

Calls

9 calls:

Time	Variable	Point
9.0ms	th	0
8.0ms	ky	-inf
4.0ms	kx	-inf
4.0ms	kx	inf
4.0ms	ky	inf

rewrite212.0ms (2.6%)

Memory

44.4MiB live, 361.0MiB allocated; 79ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	57	381
0	91	371
1	312	353
2	1274	343
0	4122	337

Stop Event

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

Counts

40 → 530

Calls

Call 1

Inputs
th
(sin.f64 th)
kx
(sin.f64 kx)
ky
(sin.f64 ky)
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(*.f64 ky (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 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(literal 1 binary64)
#s(literal -1/6 binary64)
#s(literal 2 binary64)
(pow.f64 th #s(literal 2 binary64))
(*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))
(.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 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
(.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)))))))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.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))))))) (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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(pow.f64 kx #s(literal 2 binary64))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
(pow.f64 ky #s(literal 2 binary64))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
(+.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))))
(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)))))
(/.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))))))
(*.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))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))

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

eval165.0ms (2.0%)

Memory: 18.3MiB live, 249.0MiB allocated; 81ms collecting garbage
Compiler: Compiled 29 611 to 3 866 computations (86.9% saved)

prune127.0ms (1.5%)

Memory

2.2MiB live, 463.6MiB allocated; 60ms collecting garbage

Pruning

87 alts after pruning (83 fresh and 4 done)

	Pruned	Kept	Total
New	731	56	787
Fresh	12	27	39
Picked	5	0	5
Done	-2	4	2
Total	746	87	833

Accuracy

100.0%

Counts

833 → 87

Alt Table

Click to see full alt table

Status	Accuracy	Program
	12.6%	(/.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(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
✓	94.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	55.1%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
	42.6%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
	46.7%	(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	27.4%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
✓	99.7%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	74.4%	(*.f64 (/.f64 (sin.f64 th) (/.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 ky))
	42.7%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	51.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
	29.2%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
	74.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64)))) (sin.f64 th))
	29.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
	18.6%	(.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
	42.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))
	28.2%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
	38.7%	(*.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))
	55.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
	27.6%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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))
	99.5%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 th))) (sin.f64 ky))
	29.3%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
	99.5%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)) (sin.f64 ky))
▶	99.6%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
	43.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
	29.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
	27.4%	(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
	40.2%	(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
	42.6%	(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
	42.6%	(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
	3.1%	(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
	43.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
	29.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
	43.2%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
	51.2%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
	26.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th)))
	42.6%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
	20.3%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
▶	29.8%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
	16.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
	19.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
	16.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
	23.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
	5.2%	(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
	47.8%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
	50.7%	(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
	35.2%	#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))))
	18.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
	20.8%	#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)))))
	17.3%	#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 #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(literal 2 binary64)))))
	25.1%	#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 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
	25.2%	#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)))))))
	17.4%	#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))))))
	17.3%	#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) (.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)))))))))
	13.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
	12.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
	13.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
	13.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
	9.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
	10.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
	9.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	11.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	17.8%	#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)))))
	34.6%	#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))))
▶	37.5%	#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))
	20.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
	35.2%	#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)))
	18.1%	#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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky)))
	37.5%	#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)))))
	20.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	20.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
✓	19.7%	#s(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)))
	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 ky #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))))))) kx)))
	13.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 (.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)))
	13.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 #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)))
▶	13.4%	#s(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 ky th)) kx)))
	19.7%	#s(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 ky (sin.f64 th))))))
	22.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 (sin.f64 th) kx) ky)))
	19.7%	#s(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 ky (sin.f64 th)))))
	22.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 (sin.f64 th) (/.f64 ky kx))))
	22.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 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
	15.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 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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))))))
	15.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) kx) (/.f64 ky kx))))))

Compiler

Compiled 5 357 to 3 832 computations (28.5% saved)

sample0.0ms (0.0%)

Memory

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

Calls

Call 1

Inputs
1
-1
1/2

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

Samples

0.0ms

1×

valid

Compiler

Compiled 5 to 5 computations (0.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series160.0ms (1.9%)

Memory

-10.5MiB live, 357.7MiB allocated; 119ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1075	7597

Stop Event

1×	iter-limit

Counts

42 → 176

Calls

Call 1

Inputs
#s(literal 1 binary64)
kx
(sin.f64 kx)
ky
(sin.f64 ky)
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
th
(sin.f64 th)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(*.f64 ky th)
#s(approx (* ky (sin th)) (*.f64 ky th))
(/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
(fabs.f64 (sin.f64 kx))
(/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))
(*.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))
(*.f64 ky ky)
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 kx kx)
#s(approx (pow (sin kx) 2) (*.f64 kx kx))
(+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))
(sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
#s(literal 1/2 binary64)
(+.f64 kx kx)
(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 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 (-.f64 #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 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))

Outputs
#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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 kx #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.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 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (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))) (fma.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 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 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 (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))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (fma.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 (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.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)))))))) (fma.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 (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (fma.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 (fma.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)) (fma.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 (fma.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)) (fma.f64 #s(literal -1/5040 binary64) (.f64 ky (sin.f64 th)) (fma.f64 #s(literal 1/720 binary64) (.f64 ky (sin.f64 th)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (.f64 ky (sin.f64 th)) (.f64 #s(literal 1/120 binary64) (.f64 ky (sin.f64 th))))))))) (fma.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 (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (/ (sin th) (fabs (sin kx))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (* kx kx) (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 ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (fma.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) (pow (sin kx) 2)) (fma.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) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sin.f64 ky) (sin.f64 th)))))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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)))))) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th)))))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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))))) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (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)))))) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sin.f64 ky) (sin.f64 th)))))
#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/2 (cos (+ kx kx))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (+ kx kx))) (+.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 (* 1/2 (cos (+ kx kx))) (+.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 (+ 1/2 (* 1/2 (cos (+ kx kx)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (+ kx kx)))) (+.f64 #s(literal 1 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 (+ 1/2 (* 1/2 (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 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (/ -1 (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))))) (/.f64 #s(literal -1 binary64) kx))
#s(approx (/ -1 (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))
#s(approx (/ -1 (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))))) (/.f64 (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -7/360 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) kx))
#s(approx (/ -1 (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))))) (/.f64 (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -31/15120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) kx))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.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 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 #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 (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)))))))) (fma.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 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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (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)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.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 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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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 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 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))) (fma.f64 #s(literal 1/4 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 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 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))))))))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (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 (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 (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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 ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (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) (sin.f64 th))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (* 1/2 (cos (+ kx kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
#s(approx (+ 1/2 (* 1/2 (cos (+ kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx)))))) (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 (+ 1/2 (* 1/2 (cos (+ kx kx))))))) (/.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 (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (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 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (* 1/2 (cos (+ kx kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))
#s(approx (+ 1/2 (* 1/2 (cos (+ kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))))
#s(approx (/ -1 (sqrt (- 1 (+ 1/2 (* 1/2 (cos (+ kx kx))))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))))
#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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin 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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 ky #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 (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 #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 (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (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 5 binary64))) (fma.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/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 (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))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 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 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 (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 #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 (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 ky (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 ky (fma.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))))) (fma.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 (fma.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))))))) (fma.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 (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (fma.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))))) (fma.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))) (fma.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))))) (fma.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 (fma.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)))))) (fma.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 (fma.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))))))) (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (.f64 ky (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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))))) (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (.f64 ky (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.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 (fma.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))))) (fma.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))) (fma.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))))) (fma.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))))))))) (fma.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 (* ky (sin th)) (*.f64 ky (sin.f64 th)))
#s(approx (* ky ky) (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 ky) 2) (pow (sin kx) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (fma.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 ky) 2) (pow (sin kx) 2)) (fma.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 (* (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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 th) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky (sin.f64 th))))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th))) ky))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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/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))))) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))) (.f64 #s(literal 1/120 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th))))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th))) ky))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (fma.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))))) (.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/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))))) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 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))))) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))) (.f64 #s(literal 1/120 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th))))) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)) (.f64 #s(literal 1/120 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))))))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))) (.f64 #s(literal 1/120 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th))))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th)))) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (sin.f64 th))) ky))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (.f64 ky (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #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 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 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 (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 #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 (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.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/4 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 5 binary64)))))))) (fma.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 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 (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 #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 (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (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)) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (pow.f64 ky #s(literal 2 binary64)) (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.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 (pow.f64 ky #s(literal 2 binary64)) (fma.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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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 5 binary64))) (.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))))))))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (sin ky) (sin th)) (*.f64 (sin.f64 ky) (sin.f64 th)))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) (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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (.f64 th (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (* (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (sin th)) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) ky (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 ky kx) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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)) (fma.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) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin th) (fabs (sin kx))) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (/ (sin th) (fabs (sin kx))) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/120 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (/ (sin th) (fabs (sin kx))) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))) (.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin th) (fabs (sin kx))) ky) (.f64 th (fma.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) (fabs (sin kx))) ky) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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) (fabs (sin kx))) ky) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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) (sin th)) (*.f64 th (sin.f64 ky)))
#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)) (fma.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)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th (sin.f64 ky))))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 th #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))))) (sin.f64 ky)) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) th))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/36 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)) (.f64 #s(literal 1/120 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)))))) (.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) th))
#s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)) (.f64 #s(literal 1/120 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))))))))) (fma.f64 #s(literal -1/36 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)) (.f64 #s(literal 1/120 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky)))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) th))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.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 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 th #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 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (.f64 th (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (/.f64 (pow.f64 th #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 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (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/6 binary64) (/.f64 #s(literal 1 binary64) (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 binary64) (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
14.0ms	kx	0
10.0ms	ky	-inf
9.0ms	kx	inf
9.0ms	ky	0
8.0ms	kx	-inf

rewrite187.0ms (2.3%)

Memory

56.8MiB live, 427.1MiB allocated; 58ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	60	412
0	96	346
1	374	342
2	1606	342
0	4138	342

Stop Event

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

Counts

42 → 820

Calls

Call 1

Inputs
#s(literal 1 binary64)
kx
(sin.f64 kx)
ky
(sin.f64 ky)
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
th
(sin.f64 th)
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(*.f64 ky th)
#s(approx (* ky (sin th)) (*.f64 ky th))
(/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
(fabs.f64 (sin.f64 kx))
(/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))
(*.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))
(*.f64 ky ky)
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 kx kx)
#s(approx (pow (sin kx) 2) (*.f64 kx kx))
(+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))
(sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
#s(literal 1/2 binary64)
(+.f64 kx kx)
(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 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 (-.f64 #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 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))

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

eval496.0ms (6.0%)

Memory: -137.5MiB live, 290.9MiB allocated; 913ms collecting garbage
Compiler: Compiled 34 985 to 5 684 computations (83.8% saved)

prune128.0ms (1.6%)

Memory

31.4MiB live, 402.8MiB allocated; 58ms collecting garbage

Pruning

105 alts after pruning (97 fresh and 8 done)

	Pruned	Kept	Total
New	925	44	969
Fresh	25	53	78
Picked	5	0	5
Done	-4	8	4
Total	951	105	1 056

Accuracy

100.0%

Counts

1 056 → 105

Alt Table

Click to see full alt table

Status	Accuracy	Program
	12.6%	(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
✓	94.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	55.1%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
	42.6%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
	29.4%	(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (sin.f64 ky)))
	46.7%	(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	21.3%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
	27.3%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
✓	27.4%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
	16.6%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
	25.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
	17.3%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky)))))
	42.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
	26.4%	(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
	27.4%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
	29.1%	(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	45.2%	(/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th (sin.f64 ky)))))
✓	99.7%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	74.4%	(*.f64 (/.f64 (sin.f64 th) (/.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 ky))
	42.7%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	51.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
	29.2%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
	74.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64)))) (sin.f64 th))
	29.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
	18.6%	(.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
	42.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))
	28.2%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
	38.7%	(*.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))
	55.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
	29.3%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
	27.4%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.f64 (sin.f64 th) (sin.f64 ky)))
	99.5%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (sin.f64 ky))
✓	99.6%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
	55.2%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
	59.9%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
	43.3%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
	42.7%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	40.2%	(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
	42.6%	(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
	42.6%	(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
	2.7%	(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
	2.7%	(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
	43.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
	29.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
	43.2%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
	51.2%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
	26.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th)))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
	29.8%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
	29.8%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
	16.3%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
	16.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
	16.1%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
	10.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))))))))) (sin.f64 th)))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
	29.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
	16.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
	19.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
	16.9%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
	23.0%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
	4.7%	(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
	47.8%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
	50.7%	(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
	20.3%	(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
	35.2%	#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))))
	20.8%	#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)))))
	25.1%	#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 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
	25.2%	#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)))))))
	17.4%	#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))))))
	17.3%	#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) (.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)))))))))
	13.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
	12.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
	13.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
	9.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
	10.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
	11.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	34.6%	#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))))
	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
✓	37.5%	#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))
	21.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
	37.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) ky))
	35.2%	#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)))
	37.5%	#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)))))
	20.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 kx)))) ky))
	20.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	20.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
✓	19.7%	#s(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)))
	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 ky #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))))))) kx)))
	13.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 (.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)))
	13.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 #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)))
✓	13.4%	#s(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 ky th)) kx)))
	19.7%	#s(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 ky (sin.f64 th))))))
	13.4%	#s(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 #s(approx (* ky (sin th)) (*.f64 th ky))))))
	22.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 (sin.f64 th) kx) ky)))
	19.7%	#s(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 ky (sin.f64 th)))))
	13.4%	#s(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) #s(approx ( ky (sin th)) (*.f64 th ky)))))
	22.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 (sin.f64 th) (/.f64 ky kx))))
	22.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 (sin.f64 th) (.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
	15.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 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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))))))
	15.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky (pow.f64 th #s(literal 2 binary64))) kx) (/.f64 ky kx))))))
	18.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))

Compiler

Compiled 3 305 to 2 362 computations (28.5% saved)

regimes3.1s (36.9%)

Memory

90.8MiB live, 6 340.8MiB allocated; 1.1s collecting garbage

Counts

5 → 1

7 → 1

8 → 1

10 → 1

11 → 2

28 → 2

43 → 3

48 → 3

49 → 3

85 → 3

95 → 3

97 → 2

98 → 6

109 → 6

110 → 6

114 → 6

124 → 6

128 → 6

131 → 6

132 → 6

135 → 6

136 → 5

138 → 5

158 → 1

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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)))

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 #s(approx (* ky (sin th)) (*.f64 ky th)) 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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx) (/.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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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)))

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 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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.f64 th) (/.f64 ky kx))))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))

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

(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 (/.f64 #s(literal 1 binary64) 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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))

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

(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (*.f64 #s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) 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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))

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

(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx 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 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))

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

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

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (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 (/.f64 #s(literal 1 binary64) kx)))))

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

Outputs

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

(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (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 (/.f64 #s(literal 1 binary64) kx)))))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))

Outputs

(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))

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

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))

Outputs
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx 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))))))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))

Outputs
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx 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))))))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx 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))))))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #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 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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 (/.f64 #s(literal 1 binary64) kx)))))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #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))) (hypot.f64 (sin.f64 kx) (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 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))

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))) (hypot.f64 (sin.f64 kx) (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 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.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 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
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (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))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.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 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))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))

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

Outputs
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 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 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 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))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))

Call 22

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.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 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))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th (sin.f64 ky)))))
(.f64 (neg.f64 (sin.f64 ky)) #s(approx ( (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.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 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))

Outputs
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 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 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))

Call 23

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.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 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))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th (sin.f64 ky)))))
(.f64 (neg.f64 (sin.f64 ky)) #s(approx ( (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.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 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th)))

Outputs
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
(*.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 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))

Call 24

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))) (/.f64 #s(approx (* ky (sin th)) (*.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx ( ky (sin th)) (*.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 #s(approx (* ky (sin th)) (*.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))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.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)) #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 (* (/ (sin th) (fabs (sin kx))) ky) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (/ (sin th) (fabs (sin kx))) (/.f64 th (fabs.f64 (sin.f64 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 (sin.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))) (.f64 (/.f64 #s(literal 1 binary64) kx) (.f64 ky (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 #s(literal 1 binary64) (/.f64 kx (*.f64 ky (sin.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 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 #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))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (.f64 th (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (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 (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 (sin.f64 th) (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)))))))) ky))
#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 (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 (.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))))))) (sqrt.f64 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (pow.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(literal 2 binary64)))))
#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)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 #s(literal -1 binary64) kx))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) 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 (.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.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 #s(approx (sin th) #s(approx ( th (+ 1 (* -1/6 (pow th 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (.f64 (sin.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)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (sqrt.f64 (+.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))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky #s(approx (sin th) (.f64 th (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (*.f64 th th) #s(literal -1/6 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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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))))))) (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 (/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #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(literal 2 binary64)))))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (.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 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) (sqrt.f64 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (*.f64 kx kx)))) (sin.f64 ky))) (sin.f64 th))
#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 #s(literal 2 binary64) (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
#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 #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 (-.f64 (cos.f64 (-.f64 th ky)) (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)) #s(approx (pow (sin kx) 2) (.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 (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (exp.f64 (.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(approx (/ -1 (sqrt (pow (sin kx) 2))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) kx))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sqrt.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (.f64 (sin.f64 th) (sin.f64 ky)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (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 (/.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)))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 th))))
#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) (.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 #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(literal 2 binary64)))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ kx kx))) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 th) (cos.f64 (asin.f64 (cos.f64 kx)))) ky))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))) (sin.f64 th)) (neg.f64 (sin.f64 ky)))
(.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(.f64 (.f64 (neg.f64 (sin.f64 th)) (sin.f64 ky)) #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))) ky))
#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 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (.f64 kx kx))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (PI.f64))))))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (pow (sin kx) 2) (*.f64 kx kx))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (PI.f64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(.f64 #s(approx (neg (sin ky)) (.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) kx (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))) (sin.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th)))
(.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (hypot.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 #s(approx (/ -1 (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #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 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))) (sin.f64 th))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.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 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))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.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)))))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ (pow (sin ky) 2) (pow (sin kx) 2))) (* (sin ky) (sin th))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th (sin.f64 ky)))))
(.f64 (neg.f64 (sin.f64 ky)) #s(approx ( (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.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 (/.f64 #s(literal 1 binary64) (hypot.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)))))) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.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))))))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 #s(approx (/ -1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)) (sin.f64 ky))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (sin.f64 ky))
(.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 th))) (sin.f64 ky))
(/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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)))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 2 binary64)))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (neg.f64 (sin.f64 th)))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.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) (/.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 (/.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 (/.f64 (sin.f64 th) (/.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 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))

Outputs
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))

Calls

117 calls:

124.0ms	th
120.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))
100.0ms	(/.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)))))
89.0ms	th
78.0ms	(sin.f64 kx)

Results

Accuracy	Segments	Branch
13.4%	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)))))`
13.4%	1	`(sin.f64 ky)`
13.4%	1	`th`
13.4%	1	`(sin.f64 kx)`
13.4%	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))`
13.4%	1	`ky`
13.4%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
13.4%	1	`kx`
13.4%	1	`(sin.f64 th)`
15.2%	1	`kx`
15.2%	1	`(sin.f64 kx)`
15.2%	1	`ky`
15.2%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
15.2%	1	`th`
15.2%	1	`(sin.f64 th)`
15.2%	1	`(sin.f64 ky)`
15.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)))))`
15.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))`
22.0%	1	`kx`
22.0%	1	`ky`
22.0%	1	`(sin.f64 kx)`
22.0%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
22.0%	1	`(sin.f64 ky)`
22.0%	1	`th`
22.0%	1	`(sin.f64 th)`
22.0%	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)))))`
22.0%	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))`
22.0%	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)))))`
22.0%	1	`th`
22.0%	1	`(sin.f64 ky)`
22.0%	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))`
22.0%	1	`ky`
22.0%	1	`(sin.f64 kx)`
22.0%	1	`(sin.f64 th)`
22.0%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
22.0%	1	`kx`
26.6%	2	`kx`
24.8%	2	`th`
27.2%	3	`(sin.f64 th)`
26.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
26.8%	3	`(sin.f64 kx)`
27.1%	2	`th`
25.2%	2	`ky`
24.9%	2	`(sin.f64 ky)`
24.9%	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))`
28.3%	3	`kx`
27.9%	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)))))`
37.5%	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))`
39.2%	2	`kx`
37.5%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
37.5%	1	`(sin.f64 kx)`
37.5%	1	`ky`
37.5%	1	`(sin.f64 th)`
37.5%	1	`(sin.f64 ky)`
37.5%	1	`th`
40.9%	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)))))`
41.6%	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))`
42.0%	2	`kx`
42.0%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
45.9%	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)))))`
47.9%	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)))))`
45.0%	3	`(sin.f64 kx)`
45.0%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
45.0%	2	`kx`
48.0%	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)))))`
45.9%	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))`
42.6%	1	`(sin.f64 ky)`
52.8%	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)))))`
49.5%	3	`(sin.f64 kx)`
49.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
49.5%	2	`kx`
42.6%	1	`ky`
42.6%	1	`(sin.f64 th)`
42.6%	1	`th`
65.9%	2	`th`
65.4%	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)))))`
73.9%	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)))))`
73.9%	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)))))`
65.8%	3	`ky`
67.6%	3	`th`
63.9%	3	`(sin.f64 kx)`
62.9%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
60.9%	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))`
63.0%	2	`kx`
68.1%	4	`(sin.f64 th)`
65.3%	4	`(sin.f64 ky)`
74.0%	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)))))`
70.0%	3	`th`
72.7%	4	`(sin.f64 kx)`
68.2%	2	`ky`
71.6%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
71.7%	3	`kx`
84.2%	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)))))`
86.7%	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)))))`
86.7%	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)))))`
86.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)))))`
86.9%	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)))))`
87.0%	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)))))`
86.9%	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)))))`
79.9%	2	`kx`
79.4%	2	`ky`
79.2%	4	`(sin.f64 th)`
80.8%	3	`(sin.f64 kx)`
79.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
79.4%	3	`(sin.f64 ky)`
87.0%	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)))))`
71.7%	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))`
79.5%	3	`th`
99.7%	1	`(sin.f64 th)`
99.7%	1	`(sin.f64 kx)`
99.7%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.7%	1	`(sin.f64 ky)`
99.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)))))`
99.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))`
99.7%	1	`kx`
99.7%	1	`ky`
99.7%	1	`th`

Compiler

Compiled 5 458 to 1 394 computations (74.5% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch2.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9948481524875825	-0.994792105048336

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

4.4MiB live, 4.3MiB allocated; 0ms collecting garbage

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9948481524875825	-0.994792105048336

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0591732943387484	+inf
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9948481524875825	-0.994792105048336

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch3.0ms (0.0%)

Memory

-41.4MiB live, 4.5MiB allocated; 2ms collecting garbage

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000002948923
0.0ms	0.9990377408563715	1.0
0.0ms	4.4539602149441e-15	9.02586395902269e-8
0.0ms	-0.3310043839054764	-0.22058525311019347
0.0ms	-0.9999613152629244	-0.9996371631759938

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch103.0ms (1.2%)

Memory

3.2MiB live, 69.2MiB allocated; 125ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
101.0ms	1.9283224351453536	375.5030646315537

Samples

96.0ms

112×

valid

Compiler

Compiled 320 to 263 computations (17.8% saved)

Precisions

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

ival-sin: 89.0ms (95.5% of total)

ival-pow2: 2.0ms (2.1% of total)

ival-sqrt: 1.0ms (1.1% of total)

adjust: 0.0ms (0.0% of total)

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

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

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

bsearch1.0ms (0.0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0591732943387484	+inf
0.0ms	0.9887349169880844	0.9979573683792564

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0591732943387484	+inf
0.0ms	0.9623989519716272	0.9655674720805271

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0591732943387484	+inf
0.0ms	0.9623989519716272	0.9655674720805271

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0591732943387484	+inf
0.0ms	0.9887349169880844	0.9979573683792564

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch6.0ms (0.1%)

Memory

-50.1MiB live, 3.1MiB allocated; 10ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0591732943387484	+inf
0.0ms	0.9887349169880844	0.9979573683792564

Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch12.0ms (0.1%)

Memory

36.9MiB live, 37.0MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
11.0ms	375.5030646315537	739.2219816921772

Samples

8.0ms

64×

valid

Compiler

Compiled 279 to 194 computations (30.5% saved)

Precisions

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

ival-sin: 4.0ms (60.6% of total)

ival-pow2: 1.0ms (15.2% of total)

adjust: 0.0ms (0.0% of total)

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

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

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

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

bsearch31.0ms (0.4%)

Memory

-30.7MiB live, 111.6MiB allocated; 11ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
27.0ms	7.581998807626867e+27	1.311396529359569e+31

Samples

19.0ms

128×

valid

Compiler

Compiled 555 to 378 computations (31.9% saved)

Precisions

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

ival-sin: 10.0ms (65.0% of total)

ival-pow2: 3.0ms (19.5% of total)

ival-sqrt: 1.0ms (6.5% of total)

ival-div!: 1.0ms (6.5% of total)

ival-mult!: 1.0ms (6.5% of total)

adjust: 0.0ms (0.0% of total)

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

derivations307.0ms (3.7%)

Memory

14.2MiB live, 527.2MiB allocated; 53ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 3 196 to 239 computations (92.5% saved)

preprocess451.0ms (5.5%)

Memory: 14.6MiB live, 1 256.4MiB allocated; 127ms collecting garbage
Symmetry: (abs kx)
Compiler: Compiled 31 072 to 10 088 computations (67.5% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze229.0ms (2.8%)

sample1.6s (19.1%)

preprocess49.0ms (0.6%)

sample0.0ms (0.0%)

series49.0ms (0.6%)

rewrite175.0ms (2.1%)

eval95.0ms (1.1%)

prune28.0ms (0.3%)

sample0.0ms (0.0%)

series144.0ms (1.7%)

rewrite180.0ms (2.2%)

eval96.0ms (1.2%)

prune101.0ms (1.2%)

sample2.0ms (0.0%)

series90.0ms (1.1%)

rewrite212.0ms (2.6%)

eval165.0ms (2.0%)

prune127.0ms (1.5%)

sample0.0ms (0.0%)

series160.0ms (1.9%)

rewrite187.0ms (2.3%)

eval496.0ms (6.0%)

prune128.0ms (1.6%)

regimes3.1s (36.9%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch2.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch3.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch103.0ms (1.2%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch1.0ms (0.0%)

bsearch6.0ms (0.1%)

bsearch12.0ms (0.1%)

bsearch31.0ms (0.4%)

derivations307.0ms (3.7%)

preprocess451.0ms (5.5%)

end0.0ms (0.0%)

Profiling