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

start0.0ms (0%)

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

analyze193.0ms (1.8%)

Memory

6.8MiB live, 291.4MiB allocated; 31ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 18 to 14 computations (22.2% saved)

sample1.7s (15.9%)

Memory

54.7MiB live, 1 394.2MiB allocated; 302ms collecting garbage

Samples

1.3s	8 255×	0	valid
0.0ms	1×	1	valid

Precisions

Click to see histograms. Total time spent on operations: 1.1s

ival-sin: 667.0ms (62.7% of total)

ival-pow2: 234.0ms (22% of total)

ival-sqrt: 56.0ms (5.3% of total)

ival-mult!: 41.0ms (3.9% of total)

ival-div!: 36.0ms (3.4% of total)

ival-add!: 27.0ms (2.5% of total)

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess48.0ms (0.5%)

Memory

-12.7MiB live, 32.6MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	46	166
1	113	163
2	396	163
3	2511	163

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	93.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))

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 30 to 26 computations (13.3% saved)

series29.0ms (0.3%)

Memory

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

Counts

13 → 68

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
5.0ms	ky	@	0	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
4.0ms	kx	@	0	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
4.0ms	kx	@	inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
3.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
3.0ms	kx	@	-inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)

rewrite509.0ms (4.9%)

Memory

-8.0MiB live, 507.0MiB allocated; 230ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	431	3117
0	447	2917
1	1428	2605
2	7125	2525
0	9768	2472
0	20312	2108

Stop Event

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

Counts

81 → 429

Calls

Call 1

Inputs
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (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 ky)
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 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx th #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (sin th)))

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

eval53.0ms (0.5%)

Memory: 13.1MiB live, 102.2MiB allocated; 14ms collecting garbage
Compiler: Compiled 5 539 to 1 944 computations (64.9% saved)

prune25.0ms (0.2%)

Memory

19.0MiB live, 65.0MiB allocated; 4ms collecting garbage

Pruning

22 alts after pruning (21 fresh and 1 done)

	Pruned	Kept	Total
New	399	21	420
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	399	22	421

Accuracy

99.9%

Counts

421 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	99.6%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	99.0%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sqrt.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (sin.f64 th))
	75.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th))
	77.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))))) (sin.f64 th))
✓	93.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))
	48.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))))) #s(approx (sin th) th))
	75.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
▶	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	46.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	75.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (exp.f64 (.f64 (log.f64 (.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
	35.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (sin.f64 th))
	38.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	27.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
▶	31.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
	40.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	43.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	50.0%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	37.6%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	45.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
	48.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))

Compiler

Compiled 813 to 737 computations (9.3% saved)

series66.0ms (0.6%)

Memory

-3.8MiB live, 136.0MiB allocated; 20ms collecting garbage

Counts

34 → 169

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
9.0ms	kx	@	-inf	((* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))
8.0ms	ky	@	-inf	((* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))
8.0ms	ky	@	0	((* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))
8.0ms	kx	@	0	((* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))
6.0ms	ky	@	inf	((* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (+ kx kx)))) (pow (sin ky) 2)))

rewrite355.0ms (3.4%)

Memory

-6.6MiB live, 434.3MiB allocated; 70ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	834	9519
0	894	7391
1	2884	6935
0	8358	6797
0	15339	6466

Stop Event

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

Counts

203 → 663

Calls

Call 1

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

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

eval176.0ms (1.7%)

Memory: -11.7MiB live, 133.5MiB allocated; 20ms collecting garbage
Compiler: Compiled 8 677 to 2 914 computations (66.4% saved)

prune59.0ms (0.6%)

Memory

12.0MiB live, 107.0MiB allocated; 14ms collecting garbage

Pruning

56 alts after pruning (51 fresh and 5 done)

	Pruned	Kept	Total
New	573	45	618
Fresh	10	6	16
Picked	1	4	5
Done	0	1	1
Total	584	56	640

Accuracy

100.0%

Counts

640 → 56

Alt Table

Click to see full alt table

Status	Accuracy	Program
	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	30.9%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
✓	99.6%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	51.0%	(.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))
	53.8%	(.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))
	59.1%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))) #s(approx (sin ky) ky))
	53.1%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))) (sin.f64 ky))
	75.7%	(*.f64 (/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 ky))
	75.7%	(.f64 (/.f64 (sin.f64 th) (.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)))) (sin.f64 ky))
	40.0%	(*.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky))
	43.8%	(*.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
▶	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
▶	38.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
✓	93.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))
	48.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))))) #s(approx (sin th) th))
	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
✓	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	44.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	27.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	28.0%	(.f64 (/.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))))) (sin.f64 th))
	75.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	17.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) (sin.f64 th))
	17.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) (sin.f64 th))
	27.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
✓	31.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
	16.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
▶	16.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	10.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 kx kx))))))) (sin.f64 th))
	2.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	31.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	11.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx)))))) (sin.f64 th))
	40.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
▶	43.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	51.7%	(.f64 (/.f64 #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	52.1%	(*.f64 (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	28.0%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) (sin.f64 th))
	30.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) (sin.f64 th))
	41.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
	33.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
	25.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
	51.7%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (/.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th)) (sin.f64 ky))
	30.2%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))) (sin.f64 th))
	18.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))) (sin.f64 th))
	25.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (/.f64 (sqrt.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	26.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th))
✓	37.6%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	19.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)))
	19.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
▶	19.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	22.1%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) (sin.f64 th))
	45.6%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
	36.4%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	48.4%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))

Compiler

Compiled 2 214 to 2 009 computations (9.3% saved)

series74.0ms (0.7%)

Memory

8.8MiB live, 126.2MiB allocated; 29ms collecting garbage

Counts

36 → 173

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
18.0ms	th	@	inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2))) (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)) (- 1 (cos (+ ky ky))) 1 (cos (+ ky ky)) (+ ky ky) (pow (sin kx) 2) (* kx kx))
13.0ms	kx	@	inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2))) (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)) (- 1 (cos (+ ky ky))) 1 (cos (+ ky ky)) (+ ky ky) (pow (sin kx) 2) (* kx kx))
9.0ms	kx	@	0	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2))) (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)) (- 1 (cos (+ ky ky))) 1 (cos (+ ky ky)) (+ ky ky) (pow (sin kx) 2) (* kx kx))
9.0ms	kx	@	-inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2))) (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)) (- 1 (cos (+ ky ky))) 1 (cos (+ ky ky)) (+ ky ky) (pow (sin kx) 2) (* kx kx))
5.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (+ kx kx)))) 1/2 (* 1/2 (cos (+ kx kx))) (cos (+ kx kx)) (+ kx kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)))) (sqrt (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2))) (+ (* 1/2 (- 1 (cos (+ ky ky)))) (pow (sin kx) 2)) (- 1 (cos (+ ky ky))) 1 (cos (+ ky ky)) (+ ky ky) (pow (sin kx) 2) (* kx kx))

rewrite528.0ms (5.1%)

Memory

-3.2MiB live, 625.7MiB allocated; 195ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	777	9464
0	826	7284
1	2436	6857
0	9244	6716
0	24583	6385

Stop Event

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

Counts

209 → 541

Calls

Call 1

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

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

eval185.0ms (1.8%)

Memory: 11.1MiB live, 99.7MiB allocated; 16ms collecting garbage
Compiler: Compiled 7 109 to 2 558 computations (64% saved)

prune84.0ms (0.8%)

Memory

-13.7MiB live, 127.0MiB allocated; 35ms collecting garbage

Pruning

80 alts after pruning (70 fresh and 10 done)

	Pruned	Kept	Total
New	468	32	500
Fresh	8	38	46
Picked	0	5	5
Done	0	5	5
Total	476	80	556

Accuracy

100.0%

Counts

556 → 80

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	42.4%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fabs.f64 (sin.f64 kx))))
	16.8%	(/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
✓	99.6%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	51.0%	(.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))
	53.8%	(.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))
	59.1%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))) #s(approx (sin ky) ky))
	53.1%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))) (sin.f64 ky))
	75.7%	(*.f64 (/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 ky))
	75.7%	(.f64 (/.f64 (sin.f64 th) (.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)))) (sin.f64 ky))
	40.0%	(*.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky))
	43.8%	(*.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
✓	38.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
	22.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	93.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))
	48.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))))) #s(approx (sin th) th))
	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
✓	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	27.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	28.0%	(.f64 (/.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))))) (sin.f64 th))
	39.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) #s(approx (sin th) th))
	19.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
	17.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
	19.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 ky ky))))) #s(approx (sin th) th))
	75.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	17.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) (sin.f64 th))
▶	13.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) #s(approx (sin th) th))
	17.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) (sin.f64 th))
	12.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) #s(approx (sin th) th))
	27.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
✓	31.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
✓	16.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	10.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 kx kx))))))) (sin.f64 th))
	9.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 kx kx))))))) #s(approx (sin th) th))
	2.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	14.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	16.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	13.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))))) #s(approx (sin th) th))
	13.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 kx kx)) #s(literal 1/3 binary64)) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx)))))) #s(approx (sin th) th))
	6.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx)))))) #s(approx (sin th) th))
	13.5%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx)))))) (sin.f64 th))
▶	31.0%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
✓	43.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	22.5%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	23.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin kx) kx)))) (sin.f64 th))
	51.7%	(.f64 (/.f64 #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	52.1%	(*.f64 (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	28.0%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) (sin.f64 th))
	18.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
	30.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) (sin.f64 th))
	13.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	37.0%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	62.3%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
▶	33.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
	25.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
	14.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	51.7%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (/.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th)) (sin.f64 ky))
	30.2%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))) (sin.f64 th))
	16.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))) #s(approx (sin th) th))
	18.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))) (sin.f64 th))
	14.0%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))) #s(approx (sin th) th))
	25.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (/.f64 (sqrt.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	26.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th))
	13.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
✓	37.6%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	19.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)))
	19.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	19.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	15.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	15.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	15.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) #s(approx (sin th) th))
	22.1%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) (sin.f64 th))
▶	15.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) #s(approx (sin th) th))
	45.6%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
	36.4%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	48.4%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin ky)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))

Compiler

Compiled 3 294 to 3 035 computations (7.9% saved)

series35.0ms (0.3%)

Memory

21.7MiB live, 63.6MiB allocated; 9ms collecting garbage

Counts

45 → 150

Calls

Call 1

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

Outputs
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ ky (fabs (sin kx))) #s(hole binary64 (/ ky (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* -1 (* kx (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (- (* 2/3 (* kx (cos (* 1/2 (PI))))) (* -1 (sin (* 1/2 (PI)))))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (* 1/2 (PI))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (cos (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* -1 (* kx (sin (* 1/2 (PI))))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* kx (+ (* -1 (sin (* 1/2 (PI)))) (* -2/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 2 (* kx (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* -2 (* kx (sin (* 1/2 (PI))))) (* 2 (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* 2 (cos (* 1/2 (PI)))) (* kx (+ (* -2 (sin (* 1/2 (PI)))) (* -4/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 2 kx))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (+ (* -1/3 (/ (* (pow kx 2) (sqrt 1/2)) (sqrt 2))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (+ (* (sqrt 1/2) (sqrt 2)) (* (pow kx 2) (+ (* -1/3 (/ (sqrt 1/2) (sqrt 2))) (* 1/2 (/ (* (pow kx 2) (* (sqrt 1/2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))))) (sqrt 2)))))))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (+ (* (sqrt 1/2) (sqrt 2)) (* (pow kx 2) (+ (* -1/3 (/ (sqrt 1/2) (sqrt 2))) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (* (sqrt 1/2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/2 (/ (* (sqrt 1/2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2)))))))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (sqrt 2))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (+ (sqrt 2) (* -1/3 (/ (pow kx 2) (sqrt 2)))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (+ (sqrt 2) (* (pow kx 2) (- (* 1/2 (/ (* (pow kx 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (+ (sqrt 2) (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2)))))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* 2 (pow kx 2))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))))
#s(approx (cos (+ kx kx)) #s(hole binary64 1))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (+ kx kx) #s(hole binary64 (* 2 kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 2 kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* kx (+ 2 (* 1/2 (/ (PI) kx))))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx)))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (sqrt (- 1 (cos (* 2 kx))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (* 2 kx)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* -1 (* kx (- (* -1/2 (/ (PI) kx)) 2)))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (- 1 (cos (neg (* -2 kx))))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (sqrt (- 1 (cos (neg (* -2 kx)))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (neg (* -2 kx))))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (neg (* -2 kx)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (sin th))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx th #s(hole binary64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))

Calls

9 calls:

Time	Variable		Point	Expression
7.0ms	ky	@	-inf	((/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin th) (sin ky)) (sin th) th (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin kx) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx)))) (- 1 (cos (+ kx kx))) 1 (cos (+ kx kx)) (+ kx kx))
5.0ms	kx	@	0	((/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin th) (sin ky)) (sin th) th (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin kx) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx)))) (- 1 (cos (+ kx kx))) 1 (cos (+ kx kx)) (+ kx kx))
4.0ms	kx	@	inf	((/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin th) (sin ky)) (sin th) th (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin kx) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx)))) (- 1 (cos (+ kx kx))) 1 (cos (+ kx kx)) (+ kx kx))
4.0ms	kx	@	-inf	((/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin th) (sin ky)) (sin th) th (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin kx) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx)))) (- 1 (cos (+ kx kx))) 1 (cos (+ kx kx)) (+ kx kx))
3.0ms	ky	@	inf	((/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin th) (sin ky)) (sin th) th (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/ ky (fabs (sin kx))) (fabs (sin kx)) (sin kx) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (* kx kx) (pow (sin ky) 2) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx)))) (- 1 (cos (+ kx kx))) 1 (cos (+ kx kx)) (+ kx kx))

rewrite440.0ms (4.2%)

Memory

-14.2MiB live, 470.9MiB allocated; 117ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	769	6362
0	822	5258
1	2577	4919
0	8364	4850
0	17008	4601

Stop Event

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

Counts

195 → 547

Calls

Call 1

Inputs
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (sin.f64 th) (sin.f64 ky))
(sin.f64 th)
th
(sin.f64 ky)
ky
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) #s(approx (sin th) th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))
(fabs.f64 #s(approx (sin kx) kx))
#s(approx (sin kx) kx)
#s(approx (sin th) th)
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64)))))
#s(approx (sin ky) ky)
(sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))
(+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64)))
#s(approx (pow (sin kx) 2) (*.f64 kx kx))
(*.f64 kx kx)
(pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) #s(approx (sin th) th))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64)))))))))
(sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 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 2 binary64))))))
#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 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(sqrt.f64 #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
#s(literal 1 binary64)
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ ky (fabs (sin kx))) #s(hole binary64 (/ ky (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* -1 (* kx (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (- (* 2/3 (* kx (cos (* 1/2 (PI))))) (* -1 (sin (* 1/2 (PI)))))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (* 1/2 (PI))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (cos (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* -1 (* kx (sin (* 1/2 (PI))))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* kx (+ (* -1 (sin (* 1/2 (PI)))) (* -2/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 2 (* kx (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* -2 (* kx (sin (* 1/2 (PI))))) (* 2 (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* 2 (cos (* 1/2 (PI)))) (* kx (+ (* -2 (sin (* 1/2 (PI)))) (* -4/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 2 kx))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (+ (* -1/3 (/ (* (pow kx 2) (sqrt 1/2)) (sqrt 2))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (+ (* (sqrt 1/2) (sqrt 2)) (* (pow kx 2) (+ (* -1/3 (/ (sqrt 1/2) (sqrt 2))) (* 1/2 (/ (* (pow kx 2) (* (sqrt 1/2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))))) (sqrt 2)))))))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* kx (+ (* (sqrt 1/2) (sqrt 2)) (* (pow kx 2) (+ (* -1/3 (/ (sqrt 1/2) (sqrt 2))) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (* (sqrt 1/2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/2 (/ (* (sqrt 1/2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2)))))))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (sqrt 2))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (+ (sqrt 2) (* -1/3 (/ (pow kx 2) (sqrt 2)))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (+ (sqrt 2) (* (pow kx 2) (- (* 1/2 (/ (* (pow kx 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (* kx (+ (sqrt 2) (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2)))))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* 2 (pow kx 2))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))))
#s(approx (cos (+ kx kx)) #s(hole binary64 1))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (+ kx kx) #s(hole binary64 (* 2 kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 2 kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* kx (+ 2 (* 1/2 (/ (PI) kx))))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx)))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (sqrt (- 1 (cos (* 2 kx))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (* 2 kx)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* -1 (* kx (- (* -1/2 (/ (PI) kx)) 2)))))
#s(approx (* (sqrt 1/2) (sqrt (- 1 (cos (+ kx kx))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (- 1 (cos (neg (* -2 kx))))))))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) #s(hole binary64 (sqrt (- 1 (cos (neg (* -2 kx)))))))
#s(approx (- 1 (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (neg (* -2 kx))))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (neg (* -2 kx)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (sin th))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx th #s(hole binary64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))

Outputs
(*.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 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (neg.f64 (neg.f64 (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 ky)) (sin.f64 th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 th ky)) #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 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 th ky)) #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 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 ky th)) #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 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky th)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky th)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 th ky)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 th ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky th)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky th)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)))
(-.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 ky th)) #s(literal 2 binary64)))
(sin.f64 th)
th
(sin.f64 ky)
ky
(.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))
(/.f64 (sqrt.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))))) #s(literal 2 binary64))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(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))) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(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))) (neg.f64 (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))) (fabs.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))) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(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))) (neg.f64 (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))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(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 (sin.f64 ky)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(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 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (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 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (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 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(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 (sin.f64 kx) (pow.f64 (neg.f64 (neg.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (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 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(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))
(exp.f64 (.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 1/2 binary64)))
(sin.f64 kx)
kx
(*.f64 #s(approx (sin th) th) #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) #s(approx (sin th) th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 (fabs.f64 #s(approx (sin kx) kx)))))
(/.f64 (neg.f64 ky) (neg.f64 (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))
(neg.f64 (/.f64 ky (neg.f64 (fabs.f64 #s(approx (sin kx) kx)))))
(neg.f64 (/.f64 (neg.f64 ky) (fabs.f64 #s(approx (sin kx) kx))))
(*.f64 (pow.f64 (neg.f64 #s(approx (sin kx) kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 #s(approx (sin kx) kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 #s(approx (sin kx) kx)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 #s(approx (sin kx) kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 1/2 binary64)) (pow.f64 #s(approx (sin kx) kx) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 #s(approx (sin kx) kx))) (sqrt.f64 (neg.f64 #s(approx (sin kx) kx))))
(*.f64 (sqrt.f64 (fabs.f64 #s(approx (sin kx) kx))) (sqrt.f64 (fabs.f64 #s(approx (sin kx) kx))))
(*.f64 (sqrt.f64 #s(approx (sin kx) kx)) (sqrt.f64 #s(approx (sin kx) kx)))
(.f64 (pow.f64 (.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)) #s(literal 1/4 binary64)))
(pow.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)) #s(literal 1/2 binary64))
(pow.f64 #s(approx (sin kx) kx) #s(literal 1 binary64))
(sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))
(fabs.f64 (neg.f64 (neg.f64 #s(approx (sin kx) kx))))
(fabs.f64 (neg.f64 #s(approx (sin kx) kx)))
(fabs.f64 #s(approx (sin kx) kx))
(exp.f64 (.f64 (log.f64 (.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx))) #s(literal 1/2 binary64)))
#s(approx (sin kx) kx)
#s(approx (sin th) th)
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))
(/.f64 (neg.f64 (.f64 #s(approx (sin ky) ky) (sin.f64 th))) (neg.f64 (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))
(/.f64 (.f64 #s(approx (sin ky) ky) (sin.f64 th)) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))))
(/.f64 (neg.f64 (neg.f64 #s(approx (sin ky) ky))) (neg.f64 (neg.f64 (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))))))
(/.f64 (neg.f64 #s(approx (sin ky) ky)) (neg.f64 (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))
(/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))))
(neg.f64 (/.f64 #s(approx (sin ky) ky) (neg.f64 (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))))))
(neg.f64 (/.f64 (neg.f64 #s(approx (sin ky) ky)) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))
#s(approx (sin ky) ky)
(.f64 (pow.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))
(exp.f64 (.f64 (log.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky)) #s(literal 3 binary64))) (fma.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) (fma.f64 (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky)) (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky)) (.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky))))))
(/.f64 (-.f64 (.f64 #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx))) (.f64 (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky)) (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky)))) (+.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky))))
(fma.f64 (pow.f64 #s(approx (sin ky) ky) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))
(fma.f64 (fabs.f64 #s(approx (sin ky) ky)) (fabs.f64 #s(approx (sin ky) ky)) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))
(fma.f64 (neg.f64 #s(approx (sin ky) ky)) (neg.f64 #s(approx (sin ky) ky)) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))
(fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))
(-.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) (.f64 (neg.f64 #s(approx (sin ky) ky)) #s(approx (sin ky) ky)))
(+.f64 (.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky)) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))
(+.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx)) (.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx 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 (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))
(neg.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)))
(*.f64 (pow.f64 #s(approx (sin ky) ky) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 1 binary64)))
(*.f64 (fabs.f64 #s(approx (sin ky) ky)) (fabs.f64 #s(approx (sin ky) ky)))
(*.f64 (neg.f64 #s(approx (sin ky) ky)) (neg.f64 #s(approx (sin ky) ky)))
(*.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky))
(pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (sin ky) ky)) #s(literal 2 binary64)))
#s(literal 2 binary64)
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
(.f64 #s(approx (sin th) th) (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th))) (neg.f64 (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))
(pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.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 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #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 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 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 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 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 (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 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 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(neg.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(sqrt.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (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 1/2 binary64)))
(fabs.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #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 #s(literal 1/2 binary64) (.f64 (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 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
#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)))
(neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(fma.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (cos.f64 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 (pow.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64))) (.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))) (fma.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 kx kx)))
(sin.f64 (fma.f64 #s(literal -2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 kx) #s(literal 1 binary64)) (pow.f64 (cos.f64 kx) #s(literal 1 binary64)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -2 binary64) kx) (.f64 #s(literal -2 binary64) kx) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) kx)))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (.f64 #s(literal -2 binary64) kx) (.f64 #s(literal -2 binary64) kx))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) kx)))
(fma.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 kx kx))
(fma.f64 (neg.f64 kx) #s(literal -2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal -2 binary64) (neg.f64 kx) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 kx #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) kx))
(+.f64 (+.f64 kx kx) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 kx kx))
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(PI.f64)
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (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 (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 (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 (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 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 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/4 binary64)))
(.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #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))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal -2 binary64)))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (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)))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.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)))
(exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 1/4 binary64)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/4 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
#s(literal 1 binary64)
(*.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 (pow.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64))) (.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))) (fma.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 kx kx)))
(sin.f64 (fma.f64 #s(literal -2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 kx) #s(literal 1 binary64)) (pow.f64 (cos.f64 kx) #s(literal 1 binary64)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 kx) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (neg.f64 kx))
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(fma.f64 (.f64 kx (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) kx))
(fma.f64 #s(literal 1 binary64) kx (*.f64 #s(literal 1 binary64) kx))
(fma.f64 kx #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) kx))
(+.f64 (.f64 #s(literal 1 binary64) kx) (.f64 #s(literal 1 binary64) kx))
(+.f64 kx kx)
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (.f64 (neg.f64 kx) kx) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (.f64 kx kx) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))) #s(literal 1/4 binary64)))) (.f64 (neg.f64 kx) kx) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (.f64 (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (.f64 kx kx) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 kx kx) (fabs.f64 (sin.f64 ky))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64)) (.f64 kx kx)) #s(literal 1/2 binary64)) (fabs.f64 (sin.f64 ky))) (.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 kx kx)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64))) (fabs.f64 (sin.f64 ky))) (.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky)))) (*.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (sin kx) kx)
#s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx kx kx)
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (.f64 (neg.f64 kx) kx) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (.f64 kx kx) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))) #s(literal 1/4 binary64)))) (.f64 (neg.f64 kx) kx) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (.f64 (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (.f64 kx kx) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (.f64 (neg.f64 kx) kx) (fma.f64 (.f64 (sin.f64 ky) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (.f64 kx kx) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (.f64 (sin.f64 ky) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) (fma.f64 (.f64 (sin.f64 ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 ky) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal 1/4 binary64)))) (.f64 (neg.f64 kx) kx) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (.f64 kx kx) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ ky (fabs (sin kx))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 kx kx) (fabs.f64 (sin.f64 ky))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/3 binary64)) (.f64 kx kx)) #s(literal 1/2 binary64)) (fabs.f64 (sin.f64 ky))) (.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 kx kx)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) #s(literal -1/6 binary64))) (fabs.f64 (sin.f64 ky))) (.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky)))) (*.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 kx kx)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 kx kx) #s(literal 2/45 binary64)) (.f64 kx kx) #s(literal -1/3 binary64)) (.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (* kx kx) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (fma.f64 (neg.f64 kx) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (fma.f64 kx (-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) kx) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (fma.f64 kx (-.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) kx) #s(literal 2/3 binary64)) (sin.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) kx) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (fma.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) kx (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (fma.f64 kx (fma.f64 (sin.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) kx (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (fma.f64 kx (fma.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) kx) (sin.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) kx (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (fma.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (+.f64 kx kx) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (fma.f64 kx (.f64 #s(literal -2 binary64) (-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) kx) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (fma.f64 (fma.f64 kx (fma.f64 #s(literal -4/3 binary64) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) kx) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal -2 binary64))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) kx (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx)))
#s(approx (fabs (sin kx)) (*.f64 #s(literal 1 binary64) kx))
#s(approx (fabs (sin kx)) (.f64 (fma.f64 (.f64 (*.f64 kx kx) #s(literal 1/2 binary64)) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx))
#s(approx (fabs (sin kx)) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal 1/30 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 kx kx)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (fabs (sin kx)) (.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/1260 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 kx kx)) (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/30 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) kx))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) (.f64 (fma.f64 (/.f64 (.f64 kx kx) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64))) kx))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) (.f64 (fma.f64 (.f64 kx kx) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/30 binary64) (*.f64 kx kx))) #s(literal 1/3 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) kx))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) (.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/1260 binary64) (.f64 kx kx)) #s(literal 1/60 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 kx kx) (.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 kx kx) (sqrt.f64 #s(literal 2 binary64))) kx))
#s(approx (- 1 (cos (+ kx kx))) (*.f64 kx (+.f64 kx kx)))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 kx kx) #s(literal 2 binary64)) (*.f64 kx kx)))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 4/45 binary64) (.f64 kx kx)) #s(literal 2/3 binary64)) (.f64 kx kx) #s(literal 2 binary64)) (*.f64 kx kx)))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -2/315 binary64) (.f64 kx kx) #s(literal 4/45 binary64)) (.f64 kx kx)) #s(literal 2/3 binary64)) (.f64 kx kx) #s(literal 2 binary64)) (.f64 kx kx)))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(literal 1 binary64))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (fma.f64 #s(literal -2 binary64) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (.f64 kx kx) #s(literal -2 binary64)) (.f64 kx kx) #s(literal 1 binary64)))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal -4/45 binary64) (.f64 kx kx) #s(literal 2/3 binary64)) (.f64 kx kx) #s(literal -2 binary64)) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (+ kx kx) (+.f64 kx kx))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))) #s(literal 1/2 binary64)))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (+.f64 kx kx))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (PI.f64) kx) #s(literal 1/2 binary64) #s(literal 2 binary64)) kx))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (cos.f64 (+.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))) #s(literal 1/2 binary64)))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 kx kx))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 (neg.f64 kx) (fma.f64 (/.f64 (PI.f64) kx) #s(literal -1/2 binary64) #s(literal -2 binary64))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (- 1 (cos (+ kx kx)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (cos.f64 (+.f64 kx kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (fma.f64 (-.f64 (/.f64 (.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (sin.f64 th) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/5040 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (sin.f64 th) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (/.f64 (.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx)))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (sin.f64 th) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 th) ky))
#s(approx (* (sin th) (sin ky)) (.f64 (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th)) ky))
#s(approx (* (sin th) (sin ky)) (.f64 (fma.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 ky ky) (sin.f64 th)) ky))
#s(approx (* (sin th) (sin ky)) (.f64 ky (fma.f64 (fma.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 ky ky) (.f64 (sin.f64 th) #s(literal -1/6 binary64))) (.f64 ky ky) (sin.f64 th))))
#s(approx (sin ky) ky)
#s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 ky ky) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx ky ky)
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (.f64 ky ky)) #s(literal 1/2 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (.f64 ky ky)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64))) (fabs.f64 (sin.f64 kx))) (.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (fma.f64 (-.f64 (/.f64 (.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (sin.f64 th) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/5040 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (sin.f64 th) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (/.f64 (.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx)))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (sin.f64 th) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (fma.f64 (.f64 (neg.f64 ky) ky) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (fma.f64 (-.f64 (.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) (-.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1/5040 binary64) (fabs.f64 (sin.f64 kx)))) (.f64 (neg.f64 ky) ky) (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/3 binary64)) (.f64 ky ky)) #s(literal 1/2 binary64)) (fabs.f64 (sin.f64 kx))) (.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (.f64 ky ky)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal -1/6 binary64))) (fabs.f64 (sin.f64 kx))) (.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (*.f64 ky ky)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
#s(approx (pow (sin ky) 2) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) (.f64 ky ky) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (pow (sin ky) 2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (/.f64 (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (/.f64 (.f64 (sin.f64 ky) (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (sin.f64 ky) (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 th th) (/.f64 (.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) th))
#s(approx (* (sin th) (sin ky)) (.f64 (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 ky)) th))
#s(approx (* (sin th) (sin ky)) (.f64 (fma.f64 (.f64 (sin.f64 ky) (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 th th) (sin.f64 ky)) th))
#s(approx (* (sin th) (sin ky)) (.f64 th (fma.f64 (fma.f64 (.f64 (sin.f64 ky) (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 th th) (.f64 (sin.f64 ky) #s(literal -1/6 binary64))) (.f64 th th) (sin.f64 ky))))
#s(approx (sin th) th)
#s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th))
#s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (sin th) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th))
#s(approx th th)
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (/.f64 (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (/.f64 (.f64 (sin.f64 ky) (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (sin.f64 ky) (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 th th) (/.f64 (.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (sin th) (sin.f64 th))

eval260.0ms (2.5%)

Memory: 43.1MiB live, 129.8MiB allocated; 17ms collecting garbage
Compiler: Compiled 6 515 to 2 487 computations (61.8% saved)

prune183.0ms (1.8%)

Memory

-5.0MiB live, 181.1MiB allocated; 34ms collecting garbage

Pruning

99 alts after pruning (86 fresh and 13 done)

	Pruned	Kept	Total
New	450	28	478
Fresh	7	58	65
Picked	2	3	5
Done	0	10	10
Total	459	99	558

Accuracy

100.0%

Counts

558 → 99

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	75.5%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 (sqrt.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64))))
	42.4%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fabs.f64 (sin.f64 kx))))
	45.6%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
	16.8%	(/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	31.7%	(/.f64 (.f64 #s(approx (sin ky) ky) (sin.f64 th)) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))))
	48.4%	(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
✓	99.6%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	51.0%	(.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))
	53.8%	(.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))
	59.1%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))) #s(approx (sin ky) ky))
	53.1%	(*.f64 (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))) (sin.f64 ky))
	75.7%	(*.f64 (/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 ky))
	75.7%	(.f64 (/.f64 (sin.f64 th) (.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/4 binary64)))) (sin.f64 ky))
	40.0%	(*.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky))
	43.8%	(*.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
✓	38.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
	22.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	93.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))
	48.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))))) #s(approx (sin th) th))
	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
✓	84.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	28.0%	(.f64 (/.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))))) (sin.f64 th))
	19.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
	17.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
	19.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 ky ky))))) #s(approx (sin th) th))
	75.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	17.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) (sin.f64 th))
	17.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) (sin.f64 th))
	12.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) #s(approx (sin th) th))
	17.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (+.f64 kx kx)))))))) #s(approx (sin th) th))
	13.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 (fma.f64 (/.f64 (PI.f64) kx) #s(literal 1/2 binary64) #s(literal 2 binary64)) kx)))))))) #s(approx (sin th) th))
	27.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
✓	31.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
✓	16.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	10.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 kx kx))))))) (sin.f64 th))
	9.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 kx kx))))))) #s(approx (sin th) th))
	2.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (+ kx kx))) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	14.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	13.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))))) #s(approx (sin th) th))
	13.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 kx kx)) #s(literal 1/3 binary64)) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx)))))) #s(approx (sin th) th))
	6.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx)))))) #s(approx (sin th) th))
	31.0%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
	13.5%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx)))))) (sin.f64 th))
	24.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (fma.f64 (.f64 kx (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) kx)))))))) (sin.f64 th))
✓	31.0%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (sin.f64 th))
	16.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	19.4%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(approx (- 1 (cos (+ kx kx))) (*.f64 kx (+.f64 kx kx))))))) (sin.f64 th))
	22.9%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(approx (sqrt (- 1 (cos (+ kx kx)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) kx))))) (sin.f64 th))
✓	43.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	22.5%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	23.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin kx) kx)))) (sin.f64 th))
	51.7%	(.f64 (/.f64 #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	52.1%	(*.f64 (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
	28.0%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) (sin.f64 th))
	18.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
	30.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) (sin.f64 th))
	9.7%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.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 2 binary64))))))))) #s(approx (sin th) th))
	13.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	37.0%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	62.3%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	32.8%	(.f64 (/.f64 #s(approx (sin ky) ky) (.f64 (pow.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (.f64 kx kx))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))) #s(literal 1/4 binary64)))) (sin.f64 th))
	20.1%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
	20.2%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	32.2%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (exp.f64 (*.f64 (log.f64 #s(approx (sin ky) ky)) #s(literal 2 binary64)))))) (sin.f64 th))
	27.5%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) (sin.f64 th))
	4.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
	14.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	31.7%	(.f64 (/.f64 #s(approx (sin ky) ky) (exp.f64 (.f64 (log.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx)))) #s(literal 1/2 binary64)))) (sin.f64 th))
	33.0%	(.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 ( 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))
	51.7%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (/.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th)) (sin.f64 ky))
	52.1%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(approx (sin th) th))
	22.2%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
	30.2%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))) (sin.f64 th))
	16.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))) #s(approx (sin th) th))
	18.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))) (sin.f64 th))
	14.0%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))) #s(approx (sin th) th))
	15.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (pow.f64 #s(approx (sin kx) kx) #s(literal 1 binary64)))) #s(approx (sin th) th))
	25.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (/.f64 (sqrt.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	26.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))))) (sin.f64 th))
	0.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 (neg.f64 #s(approx (sin kx) kx))) (sqrt.f64 (neg.f64 #s(approx (sin kx) kx)))))) #s(approx (sin th) th))
	15.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 #s(approx (sin kx) kx)) (sqrt.f64 #s(approx (sin kx) kx))))) #s(approx (sin th) th))
	13.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) #s(approx (sin th) th))
	13.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx))))) #s(approx (sin th) th))
✓	37.6%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	19.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)))
	19.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	19.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	15.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	15.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))))) #s(approx (sin th) th))
	21.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) (sin.f64 th))
	15.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))) #s(approx (sin th) th))
	22.1%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) (sin.f64 th))
✓	15.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))) #s(approx (sin th) th))
	13.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (exp.f64 (.f64 (log.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx))) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	36.4%	#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))

Compiler

Compiled 3 685 to 2 633 computations (28.5% saved)

regimes550.0ms (5.3%)

Memory

-48.7MiB live, 565.1MiB allocated; 163ms collecting garbage

Counts

127 → 1

Calls

Call 1

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

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

Calls

9 calls:

103.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))
86.0ms	(sin.f64 kx)
83.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
82.0ms	th
44.0ms	kx

Results

Accuracy	Segments	Branch
99.6%	1	`(sin.f64 th)`
99.6%	1	`(sin.f64 kx)`
99.6%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.6%	1	`(sin.f64 ky)`
99.6%	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.6%	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.6%	1	`kx`
99.6%	1	`ky`
99.6%	1	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes475.0ms (4.6%)

Memory

-9.1MiB live, 570.6MiB allocated; 87ms collecting garbage

Counts

112 → 1

Calls

Call 1

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

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

Calls

9 calls:

98.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
93.0ms	ky
55.0ms	th
53.0ms	(sin.f64 ky)
38.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)))))

Results

Accuracy	Segments	Branch
99.6%	1	`(sin.f64 th)`
99.6%	1	`(sin.f64 kx)`
99.6%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.6%	1	`(sin.f64 ky)`
99.6%	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.6%	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.6%	1	`kx`
99.6%	1	`ky`
99.6%	1	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes394.0ms (3.8%)

Memory

7.3MiB live, 491.3MiB allocated; 59ms collecting garbage

Counts

111 → 2

Calls

Call 1

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

Outputs

(*.f64 (/.f64 #s(approx (sin th) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))

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

Calls

9 calls:

94.0ms	(sin.f64 ky)
82.0ms	(sin.f64 th)
35.0ms	ky
32.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)))))
31.0ms	th

Results

Accuracy	Segments	Branch
81.5%	3	`(sin.f64 th)`
77.5%	5	`(sin.f64 kx)`
73.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
76.3%	3	`(sin.f64 ky)`
85.3%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
72.6%	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))`
77.2%	3	`kx`
75.0%	2	`ky`
81.5%	2	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes54.0ms (0.5%)

Memory

-1.0MiB live, 41.3MiB allocated; 7ms collecting garbage

Counts

107 → 2

Calls

Call 1

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

Outputs

(*.f64 #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th)) (sin.f64 ky))

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

Calls

1 calls:

48.0ms

th

Results

Accuracy	Segments	Branch
81.5%	2	`th`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes68.0ms (0.7%)

Memory

9.4MiB live, 50.9MiB allocated; 8ms collecting garbage

Counts

105 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

62.0ms

th

Results

Accuracy	Segments	Branch
81.3%	2	`th`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes70.0ms (0.7%)

Memory

10.3MiB live, 106.3MiB allocated; 21ms collecting garbage

Counts

92 → 5

Calls

Call 1

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

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

Calls

2 calls:

36.0ms	th
28.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)))))

Results

Accuracy	Segments	Branch
85.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)))))`
77.6%	2	`th`

Compiler

Compiled 13 to 14 computations (-7.7% saved)

regimes184.0ms (1.8%)

Memory

7.6MiB live, 438.3MiB allocated; 52ms collecting garbage

Counts

89 → 2

Calls

Call 1

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

Outputs

(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))) #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))

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

Calls

7 calls:

29.0ms	th
27.0ms	ky
26.0ms	kx
26.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)))))
26.0ms	(sin.f64 ky)

Results

Accuracy	Segments	Branch
64.9%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
73.6%	2	`(sin.f64 ky)`
73.7%	2	`ky`
66.5%	3	`kx`
62.3%	1	`th`
62.3%	1	`(sin.f64 th)`
73.6%	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)))))`

Compiler

Compiled 23 to 34 computations (-47.8% saved)

regimes79.0ms (0.8%)

Memory

-32.2MiB live, 61.9MiB allocated; 3ms collecting garbage

Counts

81 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

21.0ms

ky

Results

Accuracy	Segments	Branch
73.6%	2	`ky`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes108.0ms (1%)

Memory

-7.0MiB live, 95.1MiB allocated; 16ms collecting garbage

Counts

75 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

49.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)))))
19.0ms	(sin.f64 ky)
19.0ms	ky

Results

Accuracy	Segments	Branch
73.5%	2	`(sin.f64 ky)`
73.5%	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)))))`
73.5%	2	`ky`

Compiler

Compiled 15 to 18 computations (-20% saved)

regimes157.0ms (1.5%)

Memory

32.7MiB live, 124.5MiB allocated; 5ms collecting garbage

Counts

72 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

58.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))
42.0ms	ky
18.0ms	(sin.f64 kx)
18.0ms	(sin.f64 ky)
17.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)))))

Results

Accuracy	Segments	Branch
62.3%	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))`
62.3%	1	`(sin.f64 kx)`
62.3%	1	`ky`
67.9%	2	`(sin.f64 ky)`
67.9%	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)))))`

Compiler

Compiled 32 to 35 computations (-9.4% saved)

regimes186.0ms (1.8%)

Memory

1.6MiB live, 239.2MiB allocated; 28ms collecting garbage

Counts

52 → 4

Calls

Call 1

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

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

Calls

9 calls:

58.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))
19.0ms	ky
19.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
17.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)))))
16.0ms	th

Results

Accuracy	Segments	Branch
51.7%	3	`ky`
48.2%	3	`(sin.f64 kx)`
43.2%	3	`th`
42.5%	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))`
41.9%	3	`(sin.f64 th)`
48.2%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
48.2%	2	`kx`
51.2%	3	`(sin.f64 ky)`
57.7%	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)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes19.0ms (0.2%)

Memory

-11.6MiB live, 32.3MiB allocated; 6ms collecting garbage

Counts

49 → 4

Calls

Call 1

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

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

Calls

1 calls:

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

Results

Accuracy	Segments	Branch
57.7%	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)))))`

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes15.0ms (0.1%)

Memory

-7.3MiB live, 34.6MiB allocated; 7ms collecting garbage

Counts

37 → 3

Calls

Call 1

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

Outputs

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

(*.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))

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

Calls

1 calls:

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

Results

Accuracy	Segments	Branch
51.7%	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)))))`

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes23.0ms (0.2%)

Memory

16.1MiB live, 62.9MiB allocated; 2ms collecting garbage

Counts

36 → 3

Calls

Call 1

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

Outputs

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

(*.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))

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

Calls

2 calls:

11.0ms	ky
9.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)))))

Results

Accuracy	Segments	Branch
44.4%	2	`ky`
51.3%	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)))))`

Compiler

Compiled 13 to 14 computations (-7.7% saved)

regimes95.0ms (0.9%)

Memory

12.2MiB live, 204.5MiB allocated; 17ms collecting garbage

Counts

34 → 2

Calls

Call 1

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

Outputs

(*.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))

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

Calls

9 calls:

13.0ms	(sin.f64 th)
13.0ms	(sin.f64 ky)
12.0ms	ky
11.0ms	kx
9.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))

Results

Accuracy	Segments	Branch
33.0%	1	`(sin.f64 th)`
34.8%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
33.0%	1	`th`
36.4%	2	`ky`
36.9%	3	`(sin.f64 kx)`
36.9%	2	`kx`
36.8%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
36.2%	2	`(sin.f64 ky)`
39.8%	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)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes31.0ms (0.3%)

Memory

-36.1MiB live, 24.8MiB allocated; 59ms collecting garbage

Counts

16 → 2

Calls

Call 1

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

Outputs

(*.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))

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

Calls

1 calls:

30.0ms

kx

Results

Accuracy	Segments	Branch
36.8%	2	`kx`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes51.0ms (0.5%)

Memory

41.1MiB live, 126.2MiB allocated; 17ms collecting garbage

Counts

13 → 4

Calls

Call 1

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

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

Calls

9 calls:

12.0ms	(sin.f64 kx)
9.0ms	ky
4.0ms	kx
4.0ms	(sin.f64 ky)
4.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))

Results

Accuracy	Segments	Branch
27.9%	3	`(sin.f64 th)`
27.9%	2	`th`
26.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))`
29.0%	4	`(sin.f64 kx)`
28.0%	2	`(sin.f64 ky)`
28.2%	2	`ky`
31.6%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
26.3%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
29.0%	3	`kx`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes23.0ms (0.2%)

Memory

-4.5MiB live, 41.5MiB allocated; 5ms collecting garbage

Counts

11 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

8.0ms	ky
4.0ms	kx
4.0ms	(sin.f64 ky)
3.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)))))
3.0ms	th

Results

Accuracy	Segments	Branch
26.3%	2	`kx`
26.9%	2	`th`
25.9%	2	`(sin.f64 ky)`
25.9%	2	`ky`
25.4%	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)))))`

Compiler

Compiled 17 to 24 computations (-41.2% saved)

regimes48.0ms (0.5%)

Memory

9.0MiB live, 63.6MiB allocated; 22ms collecting garbage

Counts

10 → 1

Calls

Call 1

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

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

Calls

9 calls:

21.0ms	kx
3.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))
3.0ms	(sin.f64 ky)
3.0ms	(sin.f64 kx)
3.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)))))

Results

Accuracy	Segments	Branch
19.8%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
19.8%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
19.8%	1	`(sin.f64 kx)`
19.8%	1	`(sin.f64 ky)`
19.8%	1	`ky`
19.8%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
19.8%	1	`kx`
19.8%	1	`(sin.f64 th)`
19.8%	1	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes30.0ms (0.3%)

Memory

-41.0MiB live, 52.7MiB allocated; 6ms collecting garbage

Accuracy

Total -9.8b remaining (-18.1%)

Threshold costs -9.8b (-18.1%)

Counts

9 → 1

Calls

Call 1

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

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

Calls

9 calls:

5.0ms	th
3.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))
3.0ms	(sin.f64 ky)
3.0ms	(sin.f64 kx)
3.0ms	(sin.f64 th)

Results

Accuracy	Segments	Branch
15.3%	1	`kx`
15.3%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
15.3%	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))`
15.3%	1	`ky`
15.3%	1	`(sin.f64 kx)`
15.3%	1	`(sin.f64 th)`
15.3%	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.3%	1	`(sin.f64 ky)`
15.3%	1	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

bsearch4.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
3.0ms	0.0004734389375063658	0.0004952697312582736

Samples

2.0ms

16×

valid

Compiler

Compiled 50 to 47 computations (6% saved)

Precisions

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

ival-sin: 1.0ms (65.2% of total)

adjust: 0.0ms (0% of total)

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

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

ival-pow2: 0.0ms (0% of total)

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
0.0ms	0.0004734389375063658	0.0004952697312582736

Compiler

Compiled 56 to 52 computations (7.1% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
0.0ms	0.0004734389375063658	0.0004952697312582736

Compiler

Compiled 52 to 49 computations (5.8% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9926274936138454	0.9927765765941416
0.0ms	3.989149350549325e-6	0.06576225933898426
0.0ms	-0.367326360265213	-0.33709613487210166
0.0ms	-0.9981437009998011	-0.9980135515534803

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch22.0ms (0.2%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
20.0ms	0.9038132852784797	20.316862905473656

Samples

16.0ms

112×

valid

Compiler

Compiled 278 to 249 computations (10.4% saved)

Precisions

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

ival-sin: 9.0ms (71.2% of total)

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

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

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

adjust: 0.0ms (0% of total)

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

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

bsearch25.0ms (0.2%)

Memory

-11.8MiB live, 34.6MiB allocated; 2ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	20.316862905473656	478390.98223911435

Samples

18.0ms

128×

valid

Compiler

Compiled 251 to 242 computations (3.6% saved)

Precisions

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

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

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

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

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

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

adjust: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.02865415961608281	5.640295572748038e-302

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.02865415961608281	5.640295572748038e-302

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000000011	+inf
0.0ms	3.989149350549325e-6	0.06576225933898426
0.0ms	-0.02865415961608281	5.640295572748038e-302

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000000011	+inf
0.0ms	3.989149350549325e-6	0.06576225933898426
0.0ms	-0.02865415961608281	5.640295572748038e-302

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000000011	+inf
0.0ms	3.989149350549325e-6	0.06576225933898426

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000000011	+inf
0.0ms	3.989149350549325e-6	0.06576225933898426

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch22.0ms (0.2%)

Memory

-14.0MiB live, 36.1MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
20.0ms	0.15587283902013455	3.535908844921484

Samples

16.0ms

112×

valid

Compiler

Compiled 348 to 326 computations (6.3% saved)

Precisions

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

ival-sin: 9.0ms (70.8% of total)

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

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

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

adjust: 0.0ms (0% of total)

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.15587283902013455	3.535908844921484

Compiler

Compiled 327 to 305 computations (6.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000000011	+inf
0.0ms	3.989149350549325e-6	0.06576225933898426
0.0ms	1.6220894766906863e-121	6.748476335039663e-121

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch25.0ms (0.2%)

Memory

-9.8MiB live, 36.2MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
24.0ms	6.661430858410529e+26	4.210397653488379e+30

Samples

19.0ms

128×

valid

Compiler

Compiled 323 to 314 computations (2.8% saved)

Precisions

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

ival-sin: 11.0ms (71.6% of total)

ival-pow2: 2.0ms (13% 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% of total)

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

derivations1.8s (17.4%)

Memory

38.9MiB live, 1 219.9MiB allocated; 135ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 383 to 186 computations (51.4% saved)

preprocess883.0ms (8.5%)

Memory

13.3MiB live, 777.3MiB allocated; 102ms collecting garbage

Remove

(negabs th)

(negabs ky)

(abs kx)

Compiler

Compiled 7 552 to 5 779 computations (23.5% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze193.0ms (1.8%)

sample1.7s (15.9%)

preprocess48.0ms (0.5%)

series29.0ms (0.3%)

rewrite509.0ms (4.9%)

eval53.0ms (0.5%)

prune25.0ms (0.2%)

series66.0ms (0.6%)

rewrite355.0ms (3.4%)

eval176.0ms (1.7%)

prune59.0ms (0.6%)

series74.0ms (0.7%)

rewrite528.0ms (5.1%)

eval185.0ms (1.8%)

prune84.0ms (0.8%)

series35.0ms (0.3%)

rewrite440.0ms (4.2%)

eval260.0ms (2.5%)

prune183.0ms (1.8%)

regimes550.0ms (5.3%)

regimes475.0ms (4.6%)

regimes394.0ms (3.8%)

regimes54.0ms (0.5%)

regimes68.0ms (0.7%)

regimes70.0ms (0.7%)

regimes184.0ms (1.8%)

regimes79.0ms (0.8%)

regimes108.0ms (1%)

regimes157.0ms (1.5%)

regimes186.0ms (1.8%)

regimes19.0ms (0.2%)

regimes15.0ms (0.1%)

regimes23.0ms (0.2%)

regimes95.0ms (0.9%)

regimes31.0ms (0.3%)

regimes51.0ms (0.5%)

regimes23.0ms (0.2%)

regimes48.0ms (0.5%)

regimes30.0ms (0.3%)

bsearch4.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch22.0ms (0.2%)

bsearch25.0ms (0.2%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch22.0ms (0.2%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch25.0ms (0.2%)

derivations1.8s (17.4%)

preprocess883.0ms (8.5%)

end0.0ms (0%)

Profiling