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

start0.0ms (0%)

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

analyze197.0ms (2.4%)

Memory

-5.6MiB live, 235.6MiB allocated; 41ms 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.6s (18.9%)

Memory

58.9MiB live, 1 514.4MiB allocated; 222ms collecting garbage

Samples

1.3s

8 256×

valid

Precisions

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

ival-sin: 586.0ms (58.5% of total)

ival-pow2: 243.0ms (24.3% of total)

ival-mult!: 59.0ms (5.9% of total)

ival-sqrt: 57.0ms (5.7% of total)

ival-div!: 35.0ms (3.5% of total)

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

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess49.0ms (0.6%)

Memory

-25.7MiB live, 65.3MiB allocated; 13ms 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
▶	96.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 32 to 26 computations (18.8% saved)

series63.0ms (0.8%)

Memory

9.1MiB live, 53.7MiB allocated; 9ms collecting garbage

Counts

13 → 63

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 (* (/ (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 (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 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 (* (/ (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 (sin th) #s(hole binary64 (sin th)))

Calls

9 calls:

Time	Variable		Point	Expression
35.0ms	th	@	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)
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)

rewrite196.0ms (2.4%)

Memory

22.8MiB live, 394.5MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	426	3085
0	442	2885
1	2608	2588
0	8281	2276

Stop Event

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

Counts

76 → 253

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

eval39.0ms (0.5%)

Memory: 12.3MiB live, 120.1MiB allocated; 23ms collecting garbage
Compiler: Compiled 6 347 to 1 227 computations (80.7% saved)

prune26.0ms (0.3%)

Memory

-2.7MiB live, 90.2MiB allocated; 7ms collecting garbage

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	220	24	244
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	221	24	245

Accuracy

100.0%

Counts

245 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.0%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	88.4%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))) (sin.f64 th))
	40.4%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
▶	75.7%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64)))) (sin.f64 th))
	54.7%	(*.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.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	87.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	43.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	93.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	38.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (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) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
	39.1%	(.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 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
▶	32.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 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	46.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
▶	47.6%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))
	47.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (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))
	53.8%	(*.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))
	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	36.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	32.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (+.f64 (neg.f64 (.f64 (fma.f64 (pow.f64 (fabs.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)) (sin.f64 th))
	55.4%	#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))))
▶	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	52.6%	#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 1 218 to 882 computations (27.6% saved)

series278.0ms (3.4%)

Memory

30.0MiB live, 522.7MiB allocated; 112ms collecting garbage

Counts

48 → 157

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

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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#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 ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (+ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (* (sin ky) (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (+ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* (sin ky) (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (* (pow kx 2) (* (sin ky) (* (sin th) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))))))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (+ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (* (sin ky) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (+ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* (sin ky) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* (pow kx 2) (* (sin ky) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* -1/1440 (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))))))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* 1/2 (/ (pow kx 2) (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (- (+ (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (* (pow kx 2) (- (* 1/48 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* -1/1440 (/ (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/2 (/ (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))))))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (* (pow kx 2) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 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 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 (+ (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 ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* (sin ky) (* (sin th) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 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 (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 th) ky) #s(hole binary64 (* ky (sin th))))
#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 (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow ky 2)))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(hole binary64 (- (* 1/120 (pow ky 2)) 1/6)))
#s(approx (* (* ky ky) 1/120) #s(hole binary64 (* 1/120 (pow ky 2))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/6 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (+ (* 1/12 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (+ (* 1/12 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (pow ky 2) (+ (* -1/6 (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* -1/240 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/5040 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (sin th) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))))))))))))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/6 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* 1/120 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (+ (* 1/12 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* 1/120 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (+ (* 1/12 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/6 (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (+ (* -1/240 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/5040 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/1440 (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* 1/2 (/ (pow ky 2) (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (- (+ (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (* (pow ky 2) (- (* 1/48 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* -1/1440 (/ (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/2 (/ (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #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 (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #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 (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* 1/120 (pow ky 5))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 5) (- 1/120 (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 5) (- (+ 1/120 (/ 1 (pow ky 4))) (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (* 1/120 (pow ky 4))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 4) (- 1/120 (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 4) (- (+ 1/120 (/ 1 (pow ky 4))) (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(hole binary64 (* (pow ky 2) (- 1/120 (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 5) (- (* 1/6 (/ 1 (pow ky 2))) 1/120)))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 5) (- (* 1/6 (/ 1 (pow ky 2))) (+ 1/120 (/ 1 (pow ky 4))))))))
#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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (pow th 2) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)) (* (pow th 2) (+ (* -1/6 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))) (* 1/120 (* (pow th 2) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)) (* (pow th 2) (+ (* -1/6 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))) (* 1/120 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))

Calls

9 calls:

Time	Variable		Point	Expression
66.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (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 (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 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)))) (sin ky) (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (- (* (* ky ky) 1/120) 1/6) (* (* ky ky) 1/120) (* ky ky) 1/120 1/6 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) -1/2)
65.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (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 (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 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)))) (sin ky) (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (- (* (* ky ky) 1/120) 1/6) (* (* ky ky) 1/120) (* ky ky) 1/120 1/6 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) -1/2)
38.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (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 (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 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)))) (sin ky) (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (- (* (* ky ky) 1/120) 1/6) (* (* ky ky) 1/120) (* ky ky) 1/120 1/6 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) -1/2)
25.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (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 (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 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)))) (sin ky) (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (- (* (* ky ky) 1/120) 1/6) (* (* ky ky) 1/120) (* ky ky) 1/120 1/6 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) -1/2)
22.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (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 (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 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)))) (sin ky) (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (- (* (* ky ky) 1/120) 1/6) (* (* ky ky) 1/120) (* ky ky) 1/120 1/6 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) -1/2)

rewrite322.0ms (3.9%)

Memory

-7.6MiB live, 394.6MiB allocated; 222ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1026	9827
0	1100	7062
1	6709	7022
0	8171	6730

Stop Event

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

Counts

205 → 718

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
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 th) ky)
(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 #s(literal 2 binary64) ky))))))) (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 #s(literal 2 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 #s(literal 2 binary64) 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 #s(literal 2 binary64) ky)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 binary64) ky)
#s(literal 2 binary64)
(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))
(/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))))
#s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky))
(.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)
(fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))
(.f64 (.f64 ky ky) #s(literal 1/120 binary64))
(*.f64 ky ky)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
#s(literal 1 binary64)
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))
(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64)))) (sin.f64 th))
(/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64)))
(pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
#s(literal -1/2 binary64)
#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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#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 ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (+ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (* (sin ky) (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (+ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* (sin ky) (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (* (pow kx 2) (* (sin ky) (* (sin th) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))))))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (+ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (* (sin ky) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (+ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* (sin ky) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* (pow kx 2) (* (sin ky) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* -1/1440 (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))))))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* 1/2 (/ (pow kx 2) (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (- (+ (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (* (pow kx 2) (- (* 1/48 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))) (+ (* -1/1440 (/ (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/2 (/ (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))))))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2)) (* (pow kx 2) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))))) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) -1/2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 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 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 (+ (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 ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* (sin ky) (* (sin th) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 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 (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 th) ky) #s(hole binary64 (* ky (sin th))))
#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 (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow ky 2)))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(hole binary64 (- (* 1/120 (pow ky 2)) 1/6)))
#s(approx (* (* ky ky) 1/120) #s(hole binary64 (* 1/120 (pow ky 2))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/6 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (+ (* 1/12 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (+ (* 1/12 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (pow ky 2) (+ (* -1/6 (* (sin th) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* -1/240 (/ (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/5040 (* (sin th) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* (sin th) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))))))))))))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/6 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* 1/120 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (+ (* 1/12 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/6 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* 1/120 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (+ (* 1/12 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (+ (* -1/6 (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (+ (* -1/240 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/5040 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/1440 (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* 1/2 (/ (pow ky 2) (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (- (+ (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (* (pow ky 2) (- (* 1/48 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))) (+ (* -1/1440 (/ (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/2 (/ (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))))))) (+ (* 1/48 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))) (* 1/8 (/ 1 (* (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))) (* 1/2 (/ 1 (* (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* (+ (* 1/48 (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))) (* 1/8 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2)) (* (pow ky 2) (* (- (+ (* -1/96 (/ (+ (* 8 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* 12 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* -1/1440 (+ (* 32 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (* 240 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))))))) (* 1/48 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))))) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) -1/2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #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 (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) #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 (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* 1/120 (pow ky 5))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 5) (- 1/120 (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 5) (- (+ 1/120 (/ 1 (pow ky 4))) (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (* 1/120 (pow ky 4))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 4) (- 1/120 (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 4) (- (+ 1/120 (/ 1 (pow ky 4))) (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(hole binary64 (* (pow ky 2) (- 1/120 (* 1/6 (/ 1 (pow ky 2)))))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 5) (- (* 1/6 (/ 1 (pow ky 2))) 1/120)))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 5) (- (* 1/6 (/ 1 (pow ky 2))) (+ 1/120 (/ 1 (pow ky 4))))))))
#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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (pow th 2) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)) (* (pow th 2) (+ (* -1/6 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))) (* 1/120 (* (pow th 2) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))))))))))
#s(approx (* (/ (sin ky) (/ 1 (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)) (* (pow th 2) (+ (* -1/6 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/2)))) (* 1/120 (* (sin ky) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) -1/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 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (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)))
(.f64 (/.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)))
(/.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)))
(sin.f64 ky)
ky
(.f64 (pow.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(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 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(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))
(sin.f64 kx)
kx
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 th) ky)
(*.f64 ky (sin.f64 th))
(.f64 (pow.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)) #s(literal -1 binary64)) (pow.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)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #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)))
(pow.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) #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))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(pow.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)))) #s(literal 2 binary64))) (sinh.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)))) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.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 1/2 binary64)
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(sin.f64 (+.f64 (neg.f64 (+.f64 ky 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 (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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 ky ky))))
(cos.f64 (neg.f64 (+.f64 ky 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 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(+.f64 ky ky)
#s(literal 2 binary64)
(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx))))
(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx)))
(/.f64 (neg.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky))) (neg.f64 (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx))))
(/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx)))
#s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky))
(.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)
(.f64 ky (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) ky (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) ky))
(fma.f64 ky #s(literal 1 binary64) (.f64 ky (.f64 (.f64 (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky)))
(+.f64 (.f64 ky #s(literal 1 binary64)) (.f64 ky (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky)))
(+.f64 (.f64 #s(literal 1 binary64) ky) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) ky))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky)) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) #s(literal 1 binary64)))))
(fma.f64 (.f64 (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64))
(fma.f64 (.f64 ky ky) (-.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 ky ky)) (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))))
(+.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) ky) ky))
(/.f64 (-.f64 (.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) (.f64 (.f64 ky ky) #s(literal 1/120 binary64))) #s(literal 1/36 binary64)) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 3 binary64)) #s(literal 1/216 binary64)) (fma.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) (+.f64 #s(literal 1/36 binary64) (.f64 (.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))))
(-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64))
(.f64 (.f64 ky ky) #s(literal 1/120 binary64))
(.f64 #s(literal 1/120 binary64) (.f64 ky ky))
(.f64 ky (.f64 #s(literal 1/120 binary64) ky))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal 1 binary64)))
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 ky ky)
(pow.f64 ky #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 ky) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
#s(literal 1 binary64)
(pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))) #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))) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)))
(/.f64 (-.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))) (.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))))
(/.f64 (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64))) (pow.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)) #s(literal 3 binary64))) (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) 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 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(fma.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(+.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(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 #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 (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 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 (cos.f64 (-.f64 kx kx)) (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)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)) #s(literal 1 binary64)))
(.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))
(pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))
(exp.f64 (.f64 (log.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)))
(+.f64 (cosh.f64 (.f64 (log.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))) (sinh.f64 (.f64 (log.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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))))
(*.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 (sin.f64 th) (sin.f64 ky))) (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)))
(.f64 (/.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)))
(/.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)))
(.f64 (pow.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(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 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)))
(pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64)))) (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))) (-.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))) (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))) (-.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #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 ky ky)) #s(literal 1/2 binary64)))))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) #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 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.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 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.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 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.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 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #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 (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 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fma.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(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 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (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))))
(+.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 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(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 #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 (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 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 (cos.f64 (-.f64 kx kx)) (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)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(sin.f64 (+.f64 (neg.f64 (+.f64 kx 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 (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))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 kx kx))))
(cos.f64 (neg.f64 (+.f64 kx 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 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
#s(literal -1/2 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#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 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.f64 (fma.f64 (neg.f64 (.f64 kx kx)) (fma.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 #s(literal 2/45 binary64) (.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))) #s(literal 1/4 binary64))))) (fma.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) #s(literal -1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))))) (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (fma.f64 (neg.f64 (.f64 kx kx)) (fma.f64 (/.f64 (sin.f64 ky) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))) #s(literal -1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 (/.f64 (sin.f64 ky) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))) #s(literal -1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (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 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64)))) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64)))))) (fma.f64 (/.f64 (sin.f64 ky) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))) #s(literal -1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 (/.f64 (.f64 kx kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 (fma.f64 (.f64 (.f64 kx kx) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (.f64 kx kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (-.f64 #s(literal 2/45 binary64) (.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 kx kx)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (.f64 kx kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#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 (-.f64 (.f64 (.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.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) ky) (fabs (sin kx))) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.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) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.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 (- 1/2 (* 1/2 (cos (* 2 kx)))) (.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 (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.f64 (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))) (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))) (.f64 kx kx) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/96 binary64) (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (/.f64 #s(literal 1/48 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))) (.f64 kx kx) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))))) (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))) (.f64 kx kx) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky)))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (/.f64 (.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky)) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (.f64 (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (fma.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))) (.f64 (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 kx kx) (.f64 (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (fma.f64 (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (.f64 (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/96 binary64) (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (/.f64 #s(literal 1/48 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))) (.f64 (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))))) (.f64 kx kx) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 kx kx) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))) #s(literal 1/48 binary64) (/.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))) (.f64 kx kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))) #s(literal 1/48 binary64) (/.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/96 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))))))) (.f64 kx kx) (/.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))) #s(literal 1/48 binary64) (/.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3/2 binary64))))) (.f64 kx kx) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))) (.f64 kx kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))) (.f64 kx kx) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 kx kx) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 kx kx) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/96 binary64) (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (/.f64 #s(literal 1/48 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 3 binary64))))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))))) (.f64 kx kx) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 kx kx) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))) #s(literal -1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 (fma.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(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 (neg.f64 (*.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 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 (* 2 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 (* 2 kx)) #s(literal 1 binary64))
#s(approx (cos (* 2 kx)) (fma.f64 #s(literal -2 binary64) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (cos (* 2 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 (* 2 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 (* 2 kx) (+.f64 kx kx))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/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)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 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 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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.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 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.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)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.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)))) #s(literal 1/2 binary64)))) (.f64 ky ky) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (fabs.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 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 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 #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 3 binary64))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.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)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.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)))) #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/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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.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))))) #s(literal -1/2 binary64)))) (.f64 ky ky) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (fma.f64 (/.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)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.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)))) #s(literal 1/2 binary64)))) (.f64 ky ky) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (/.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (fabs.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 (fma.f64 (neg.f64 (.f64 ky ky)) (fma.f64 (pow.f64 (fabs.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 (+ (* (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 (+.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 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.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 ky ky)) (fma.f64 (pow.f64 (fabs.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) (fma.f64 (neg.f64 (.f64 ky ky)) (+.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 (fma.f64 (pow.f64 (fabs.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))))) #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2/45 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 #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 3 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (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)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.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 #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 (/.f64 #s(literal 1/120 binary64) (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)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.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))))))))) (fma.f64 (pow.f64 (fabs.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 (-.f64 (.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 (.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 (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 (*.f64 ky 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 (fma.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 ky ky)) (fabs.f64 (sin.f64 kx))) (/.f64 #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 (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)) (fabs.f64 (sin.f64 kx))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 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 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky))) (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) ky) (*.f64 (sin.f64 th) ky))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (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) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (.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/2 (* 1/2 (cos (* 2 ky)))) (.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 (* 1/2 (cos (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 ky))) (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 ky))) (fma.f64 (-.f64 (.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(literal 1/2 binary64)))
#s(approx (cos (* 2 ky)) (fma.f64 (*.f64 ky ky) #s(literal -2 binary64) #s(literal 1 binary64)))
#s(approx (cos (* 2 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 (* 2 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 (* 2 ky) (+.f64 ky ky))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (- (* (* ky ky) 1/120) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* (* ky ky) 1/120) 1/6) (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* (* ky ky) 1/120) (.f64 (.f64 ky ky) #s(literal 1/120 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 th) ky) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))) (.f64 ky ky) (.f64 (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (fma.f64 (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))) (sin.f64 th) (.f64 #s(literal 1/12 binary64) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (.f64 ky ky) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))) (.f64 ky ky) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 th) (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))) #s(literal -1/6 binary64) (fma.f64 #s(literal -1/240 binary64) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (sin.f64 th) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 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)))) #s(literal -1/96 binary64) (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (/.f64 #s(literal 1/48 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64))))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))))) (.f64 ky ky) (.f64 (.f64 (sin.f64 th) (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))))) (.f64 ky ky) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))) (.f64 ky ky) (.f64 (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (sin.f64 th))) ky))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (fma.f64 (fma.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) #s(literal -1/6 binary64) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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))) (.f64 ky ky) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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) (fma.f64 (fma.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) #s(literal 1/120 binary64) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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/12 binary64)))) (.f64 ky ky) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) #s(literal -1/6 binary64)))) (.f64 ky ky) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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) (fma.f64 (fma.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) #s(literal 1/120 binary64) (fma.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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/12 binary64) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (fma.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (+.f64 #s(literal -1/5040 binary64) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 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)))) #s(literal -1/96 binary64) (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (/.f64 #s(literal 1/48 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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/240 binary64)))))))) (.f64 ky ky) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) #s(literal -1/6 binary64)))) (.f64 ky ky) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))) 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 #s(literal 1/2 binary64) (/.f64 (.f64 ky ky) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (fma.f64 (fma.f64 (-.f64 (.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/8 binary64) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/48 binary64)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))) (.f64 ky ky) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64))) (.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 (-.f64 (/.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 5/2 binary64))) (fma.f64 (/.f64 (-.f64 (.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/8 binary64) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/48 binary64)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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/96 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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) (/.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))))) (.f64 ky ky) (.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/4 binary64))) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/8 binary64) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/48 binary64)) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))) (.f64 ky ky) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64))) (.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (.f64 ky ky)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))) (.f64 ky ky) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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))) (.f64 ky ky) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))
#s(approx (pow (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 ky ky) (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 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)))) #s(literal -1/96 binary64) (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64)))) (/.f64 #s(literal 32 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 240 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) #s(literal -1/1440 binary64)) (/.f64 #s(literal 1/48 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 3 binary64))))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))) (.f64 (fma.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 #s(literal 12 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal 2 binary64))))) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))) (.f64 ky ky) (.f64 (/.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 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))) (.f64 ky ky) (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (-.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 (* 1/2 (cos (* 2 ky))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 ky)) (cos.f64 (+.f64 ky ky)))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (*.f64 (pow.f64 ky #s(literal 5 binary64)) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (.f64 ky ky))) (pow.f64 ky #s(literal 5 binary64))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) (.f64 ky ky))) (/.f64 #s(literal 1/6 binary64) (*.f64 ky ky)))) (pow.f64 ky #s(literal 5 binary64))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (.f64 (.f64 (.f64 ky ky) (.f64 ky ky)) #s(literal 1/120 binary64)))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (.f64 (.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 ky ky)))))
#s(approx (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) (.f64 (+.f64 #s(literal 1/120 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) (.f64 ky ky))) (/.f64 #s(literal 1/6 binary64) (.f64 ky ky)))) (.f64 (.f64 ky ky) (.f64 ky ky))))
#s(approx (- (* (* ky ky) 1/120) 1/6) (.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (.f64 ky ky))) (*.f64 ky ky)))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (.f64 ky ky)) #s(literal 1/120 binary64)) (pow.f64 ky #s(literal 5 binary64)))))
#s(approx (* (+ (* (- (* (* ky ky) 1/120) 1/6) (* ky ky)) 1) ky) (neg.f64 (.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (.f64 ky ky)) #s(literal 1/120 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) (*.f64 ky ky)))) (pow.f64 ky #s(literal 5 binary64)))))
#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 (fma.f64 (/.f64 (.f64 (*.f64 th th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/6 binary64) (/.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 #s(literal 1/120 binary64) (/.f64 (.f64 (.f64 th th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.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 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (.f64 th th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.f64 (.f64 #s(literal 1/120 binary64) (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 (-.f64 (.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 (.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 (/ (* (sin th) ky) (fabs (sin kx))) (/.f64 (*.f64 th ky) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (.f64 (fma.f64 (/.f64 (.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (.f64 (/.f64 (.f64 (.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64) (.f64 (/.f64 (.f64 (.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/5040 binary64))) (.f64 th th))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (* (sin th) ky) (*.f64 th ky))
#s(approx (* (sin th) ky) (.f64 (fma.f64 (.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th))
#s(approx (* (sin th) ky) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) ky) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (* (sin th) ky) (.f64 (fma.f64 (fma.f64 (.f64 th th) (fma.f64 (.f64 (.f64 th th) ky) #s(literal -1/5040 binary64) (.f64 #s(literal 1/120 binary64) ky)) (.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (fma.f64 (.f64 (.f64 (.f64 th th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))) #s(literal -1/6 binary64) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (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 (.f64 (.f64 th th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))) #s(literal 1/120 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))) (.f64 th th) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 (.f64 th th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))) #s(literal -1/5040 binary64) (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))) (.f64 th th) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))) (.f64 th th) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (sin th) (sin.f64 th))

eval134.0ms (1.6%)

Memory: -16.2MiB live, 208.0MiB allocated; 56ms collecting garbage
Compiler: Compiled 24 395 to 3 092 computations (87.3% saved)

prune60.0ms (0.7%)

Memory

-0.6MiB live, 141.3MiB allocated; 27ms collecting garbage

Pruning

46 alts after pruning (44 fresh and 2 done)

	Pruned	Kept	Total
New	556	33	589
Fresh	8	11	19
Picked	3	2	5
Done	0	0	0
Total	567	46	613

Accuracy

100.0%

Counts

613 → 46

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.0%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	48.5%	(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx)))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	56.3%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	40.4%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	32.0%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64)))) (sin.f64 th))
	75.5%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64))))) (sin.f64 th))
	75.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	54.7%	(*.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))
	87.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	43.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	93.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	11.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) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	11.8%	(.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 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 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) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) #s(approx (sin th) (.f64 (fma.f64 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
	17.8%	(.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 #s(literal 2 binary64) ky))))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	18.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 #s(literal 2 binary64) ky))))))) #s(approx (sin th) th))
	4.2%	(.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 (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	16.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) (sin.f64 th))
	39.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	46.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	41.9%	(*.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.9%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.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)) (sin.f64 kx))) (sin.f64 th))
	52.2%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))) (sin.f64 th))
	54.2%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	66.0%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
▶	3.1%	(.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 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	75.7%	(.f64 (.f64 (/.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))) (sin.f64 th))
▶	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	36.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	75.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	22.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (.f64 (pow.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)) #s(literal -1 binary64)) (pow.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)) #s(literal -1 binary64)))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
✓	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	20.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.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)))))
	20.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
	20.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
	20.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	52.6%	#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))))
	18.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
▶	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
	36.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
	75.5%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))))
	41.4%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))))
▶	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))

Compiler

Compiled 2 672 to 1 856 computations (30.5% saved)

series94.0ms (1.1%)

Memory

-4.7MiB live, 151.9MiB allocated; 66ms collecting garbage

Counts

47 → 142

Calls

Call 1

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

Outputs
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (sin ky) (/ (sin th) (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 ky) (/ (sin th) (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 ky) (/ (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 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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#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 (+ (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 (* (sin ky) (/ (sin th) (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 (/ (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)))) #s(hole binary64 (/ (sin ky) (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 (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (sin ky) (/ (sin th) (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 ky) (/ (sin th) (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 ky) (/ (sin th) (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 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 (/ (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 th) ky) #s(hole binary64 (* ky (sin th))))
#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 (+ (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 (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 1))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (sin th)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (sin th) ky)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (+ (sin th) (* 1/6 (* (pow ky 2) (sin th)))) ky)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (+ (sin th) (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) ky)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (+ (sin th) (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) ky)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow ky 2)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6)))))
#s(approx (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) #s(hole binary64 (- (* 1/120 (pow ky 2)) 1/6)))
#s(approx (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) #s(hole binary64 (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6)))
#s(approx (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) #s(hole binary64 (* 1/120 (pow ky 2))))
#s(approx (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2))))))
#s(approx (+ (* (* ky ky) -1/5040) 1/120) #s(hole binary64 1/120))
#s(approx (+ (* (* ky ky) -1/5040) 1/120) #s(hole binary64 (+ 1/120 (* -1/5040 (pow ky 2)))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (sin th) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1/5040 (pow ky 7))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 7) (- (* 1/120 (/ 1 (pow ky 2))) 1/5040))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 7) (- (* 1/120 (/ 1 (pow ky 2))) (+ 1/5040 (/ 1/6 (pow ky 4)))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* (pow ky 7) (- (+ (* 1/120 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/5040 (/ 1/6 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (* -1/5040 (pow ky 6))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 1/120 (/ 1 (pow ky 2))) 1/5040))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 1/120 (/ 1 (pow ky 2))) (+ 1/5040 (/ 1/6 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (+ (* 1/120 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/5040 (/ 1/6 (pow ky 4)))))))
#s(approx (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) #s(hole binary64 (* -1/5040 (pow ky 4))))
#s(approx (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) #s(hole binary64 (* (pow ky 4) (- (* 1/120 (/ 1 (pow ky 2))) 1/5040))))
#s(approx (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) #s(hole binary64 (* (pow ky 4) (- (* 1/120 (/ 1 (pow ky 2))) (+ 1/5040 (/ 1/6 (pow ky 4)))))))
#s(approx (+ (* (* ky ky) -1/5040) 1/120) #s(hole binary64 (* -1/5040 (pow ky 2))))
#s(approx (+ (* (* ky ky) -1/5040) 1/120) #s(hole binary64 (* (pow ky 2) (- (* 1/120 (/ 1 (pow ky 2))) 1/5040))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (sin th) (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 ky))))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (neg (* -2 ky)))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 7) (- 1/5040 (* 1/120 (/ 1 (pow ky 2))))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 7) (- (+ 1/5040 (/ 1/6 (pow ky 4))) (* 1/120 (/ 1 (pow ky 2))))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) #s(hole binary64 (* -1 (* (pow ky 7) (- (+ 1/5040 (/ 1/6 (pow ky 4))) (+ (* 1/120 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))))))))
#s(approx (* (sin ky) (/ (sin th) (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 ky) (/ (sin th) (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 ky) (/ (sin th) (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 ky) (/ (sin th) (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) (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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/120 (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ th (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/6 (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/120 (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (* 1/6 (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))

Calls

9 calls:

Time	Variable		Point	Expression
46.0ms	ky	@	inf	((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) 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) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (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)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (* (/ (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 ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) (+ (* (* ky ky) -1/5040) 1/120) (* ky ky) -1/5040 1/120 1/6 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))
12.0ms	ky	@	0	((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) 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) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (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)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (* (/ (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 ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) (+ (* (* ky ky) -1/5040) 1/120) (* ky ky) -1/5040 1/120 1/6 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))
8.0ms	th	@	-inf	((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) 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) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (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)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (* (/ (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 ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) (+ (* (* ky ky) -1/5040) 1/120) (* ky ky) -1/5040 1/120 1/6 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))
7.0ms	ky	@	-inf	((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) 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) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (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)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (* (/ (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 ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) (+ (* (* ky ky) -1/5040) 1/120) (* ky ky) -1/5040 1/120 1/6 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))
4.0ms	th	@	inf	((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) 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) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (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)))) (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (* (/ (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 ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) ky) (+ (* (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* ky ky)) 1) (- (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) 1/6) (* (+ (* (* ky ky) -1/5040) 1/120) (* ky ky)) (+ (* (* ky ky) -1/5040) 1/120) (* ky ky) -1/5040 1/120 1/6 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))

rewrite214.0ms (2.6%)

Memory

35.6MiB live, 358.2MiB allocated; 63ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	820	6186
0	888	5234
1	4846	5181
0	8074	5011

Stop Event

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

Counts

189 → 535

Calls

Call 1

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

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

eval169.0ms (2.1%)

Memory: -16.0MiB live, 167.3MiB allocated; 35ms collecting garbage
Compiler: Compiled 20 781 to 2 555 computations (87.7% saved)

prune59.0ms (0.7%)

Memory

21.0MiB live, 155.8MiB allocated; 16ms collecting garbage

Pruning

58 alts after pruning (53 fresh and 5 done)

	Pruned	Kept	Total
New	451	23	474
Fresh	9	30	39
Picked	2	3	5
Done	0	2	2
Total	462	58	520

Accuracy

100.0%

Counts

520 → 58

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	96.0%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	48.5%	(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)) (sin.f64 kx)))
	47.2%	(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) ky) ky) #s(literal 1/6 binary64)) ky) ky #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) ky) ky) #s(literal 1/6 binary64)) ky) ky #s(literal 1 binary64)) ky)) (sin.f64 kx)))
	2.9%	(/.f64 (.f64 #s(approx (sin ky) ky) (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 ky ky)) #s(literal 1/2 binary64))))))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	56.3%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	75.5%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64))))) (sin.f64 th))
	75.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	54.7%	(*.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))
	87.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	43.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	93.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	11.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) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	11.8%	(.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 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	18.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 #s(literal 2 binary64) ky))))))) #s(approx (sin th) th))
	4.2%	(.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 (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	16.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) (sin.f64 th))
	39.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	46.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	52.2%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))) (sin.f64 th))
	66.0%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	2.6%	(.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 #s(literal 2 binary64) ky))))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	10.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) #s(approx ( 1/2 (cos (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	15.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (.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)))))) (sin.f64 th))
	22.1%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) (sin.f64 th))
	75.7%	(.f64 (.f64 (/.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))) (sin.f64 th))
✓	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	40.4%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
▶	41.8%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	56.3%	(.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	36.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	75.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	52.3%	(.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (/.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)))))
	22.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (.f64 (pow.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)) #s(literal -1 binary64)) (pow.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)) #s(literal -1 binary64)))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
✓	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	20.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	52.6%	#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))))
	18.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
	15.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
	15.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
✓	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 kx kx)) #s(literal 1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
	16.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
▶	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	21.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	36.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
▶	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
	75.5%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))))
	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))))
✓	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
▶	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 th) ky))))
	18.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
	17.9%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
	33.3%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin.f64 th)))

Compiler

Compiled 3 460 to 2 357 computations (31.9% saved)

series74.0ms (0.9%)

Memory

5.2MiB live, 106.0MiB allocated; 53ms collecting garbage

Counts

36 → 115

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

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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#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 (/ (* (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 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 (/ (* (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 (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) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (sin th)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (sin th) ky)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (+ (sin th) (* 1/6 (* (pow ky 2) (sin th)))) ky)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (+ (sin th) (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) ky)))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (+ (sin th) (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) ky)))
#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 (pow (sin ky) -1) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/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 (* (cos (+ ky ky)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#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 th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (sin th) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ (sin th) (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 ky))))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (neg (* -2 ky)))))
#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 (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/120 (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) (/ (sin ky) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (/ th (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/6 (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 1/120 (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (* 1/6 (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ (sin th) ky) #s(hole binary64 (/ th ky)))
#s(approx (/ (sin th) ky) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) ky)) (/ 1 ky)))))
#s(approx (/ (sin th) ky) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) ky)) (* 1/6 (/ 1 ky)))) (/ 1 ky)))))
#s(approx (/ (sin th) ky) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) ky)) (* 1/120 (/ 1 ky)))) (* 1/6 (/ 1 ky)))) (/ 1 ky)))))
#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))))))))

Calls

9 calls:

Time	Variable		Point	Expression
41.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ (sin th) ky) (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) -1 (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
8.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ (sin th) ky) (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) -1 (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
4.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 th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ (sin th) ky) (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) -1 (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
4.0ms	th	@	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 th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ (sin th) ky) (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) -1 (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
4.0ms	th	@	-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 th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ (sin th) ky) (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) -1 (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))

rewrite207.0ms (2.5%)

Memory

13.3MiB live, 341.1MiB allocated; 53ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	723	4579
0	771	3862
1	4408	3581
0	8315	3415

Stop Event

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

Counts

151 → 498

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

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

eval72.0ms (0.9%)

Memory: 11.5MiB live, 196.2MiB allocated; 22ms collecting garbage
Compiler: Compiled 16 397 to 2 080 computations (87.3% saved)

prune90.0ms (1.1%)

Memory

-33.4MiB live, 158.7MiB allocated; 48ms collecting garbage

Pruning

79 alts after pruning (70 fresh and 9 done)

	Pruned	Kept	Total
New	477	31	508
Fresh	9	39	48
Picked	1	4	5
Done	0	5	5
Total	487	79	566

Accuracy

100.0%

Counts

566 → 79

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	96.0%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	39.4%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))))
	50.5%	(/.f64 (.f64 (sin.f64 th) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))) (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))))
	62.3%	(/.f64 (*.f64 (sin.f64 th) #s(approx (sin ky) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))
	47.2%	(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) ky) ky) #s(literal 1/6 binary64)) ky) ky #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) ky) ky) #s(literal 1/6 binary64)) ky) ky #s(literal 1 binary64)) ky)) (sin.f64 kx)))
	52.6%	(/.f64 #s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	56.3%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	75.5%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64))))) (sin.f64 th))
	75.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	54.7%	(*.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))
	87.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	43.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	93.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	11.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) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	11.8%	(.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 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	18.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 #s(literal 2 binary64) ky))))))) #s(approx (sin th) th))
	16.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) (sin.f64 th))
	46.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	52.2%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))) (sin.f64 th))
	66.0%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	2.6%	(.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 #s(literal 2 binary64) ky))))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	22.1%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) (sin.f64 th))
	41.8%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	75.7%	(.f64 (.f64 (/.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64))) (sin.f64 th))
	38.3%	(.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	16.3%	(.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
✓	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	40.4%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
	41.8%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))))
	12.8%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx)))))))
✓	41.8%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	24.1%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) kx))))))
	23.7%	(.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	56.3%	(.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	16.3%	(.f64 (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	36.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	75.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	52.3%	(.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (/.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)))))
	36.3%	(.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	36.7%	(.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	22.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))) #s(literal -1/2 binary64))))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
✓	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	20.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	18.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
	15.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (.f64 (sqrt.f64 #s(approx (sin kx) kx)) (sqrt.f64 #s(approx (sin kx) kx)))))
	15.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
	15.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (sqrt.f64 (.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
✓	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 kx kx)) #s(literal 1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
	16.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
✓	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) ky) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
	15.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (.f64 (fma.f64 (.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
	21.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	18.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
	11.9%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
	11.8%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
	75.5%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))))
	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))))
✓	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
✓	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 th) ky))))
	12.8%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 #s(approx (sin th) (.f64 (fma.f64 (-.f64 (.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)) ky))))
	13.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 #s(approx (sin th) (.f64 (fma.f64 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)) ky))))
	13.0%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky))))
	18.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
	21.4%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 th (sin.f64 ky)))))
	13.4%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) #s(approx (/ (sin th) ky) (/.f64 th ky)))))
	13.0%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) #s(approx (/ (sin th) ky) (.f64 (fma.f64 (/.f64 (.f64 th th) ky) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) ky)) th)))))
	13.0%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) #s(approx (/ (sin th) ky) (.f64 (fma.f64 (-.f64 (.f64 (/.f64 (.f64 th th) ky) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) ky)) (.f64 th th) (/.f64 #s(literal 1 binary64) ky)) th)))))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 th) ky))))
	29.4%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 #s(approx (sin ky) ky) #s(approx (/ (sin th) (sqrt (- 1/2 ( (cos (+ ky ky)) 1/2)))) (/.f64 (sin.f64 th) ky))))
	17.9%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
	30.0%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (*.f64 (sin.f64 ky) th) (sin.f64 ky))))
	33.3%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(approx (* (sin ky) (/ (sin th) (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin.f64 th)))

Compiler

Compiled 2 549 to 1 701 computations (33.3% saved)

regimes2.7s (32.6%)

Memory

-101.9MiB live, 4 075.5MiB allocated; 1.7s collecting garbage

Accuracy

Total -2.5b remaining (-0.6%)

Threshold costs -2.5b (-0.6%)

Counts

8 → 1

12 → 2

14 → 2

21 → 3

24 → 3

29 → 3

33 → 3

34 → 2

38 → 2

39 → 3

45 → 3

48 → 3

54 → 2

57 → 2

59 → 2

60 → 2

68 → 2

70 → 5

93 → 5

94 → 1

112 → 1

Calls

Call 1

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

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

Call 2

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

Outputs

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

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

Call 3

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

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

Outputs

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

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

Call 4

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

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

Outputs

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

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

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

Call 5

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

Outputs

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

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

Call 6

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

Outputs

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

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

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

Call 7

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

Outputs

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

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

Call 8

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

Outputs

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

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

Call 9

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

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

Call 10

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

Outputs

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

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

Call 11

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

Outputs

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

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

Call 12

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

Outputs

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

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

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

Call 13

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

Outputs

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

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

Call 14

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

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

Call 15

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

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

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

Call 16

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

Outputs

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

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

Call 17

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

Outputs

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

Call 18

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

Call 19

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

Call 20

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

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

Call 21

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

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

Calls

79 calls:

557.0ms	(sin.f64 th)
69.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)))))
69.0ms	(sin.f64 kx)
66.0ms	(sin.f64 kx)
55.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
18.6%	1	`th`
18.6%	1	`(sin.f64 kx)`
18.6%	1	`kx`
18.6%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
18.6%	1	`(sin.f64 ky)`
18.6%	1	`ky`
18.6%	1	`(sin.f64 th)`
18.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))`
18.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)))))`
37.6%	2	`th`
46.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)))))`
49.7%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
51.5%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
51.6%	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)))))`
51.6%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
47.9%	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))`
43.5%	3	`(sin.f64 kx)`
43.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
43.2%	2	`kx`
43.9%	2	`ky`
43.7%	2	`(sin.f64 ky)`
51.6%	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)))))`
62.3%	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)))))`
50.2%	4	`th`
54.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))`
45.7%	3	`(sin.f64 th)`
55.5%	2	`kx`
56.0%	2	`ky`
64.1%	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)))))`
70.9%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
70.9%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
55.7%	3	`(sin.f64 kx)`
55.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
62.6%	3	`(sin.f64 ky)`
70.9%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
66.0%	1	`kx`
66.0%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
66.0%	1	`ky`
72.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)))))`
72.5%	2	`(sin.f64 ky)`
79.5%	2	`ky`
79.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)))))`
79.5%	2	`(sin.f64 ky)`
79.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)))))`
79.6%	2	`(sin.f64 ky)`
79.6%	2	`ky`
79.6%	2	`ky`
79.7%	2	`ky`
66.0%	1	`(sin.f64 th)`
66.0%	1	`th`
79.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)))))`
88.4%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
76.3%	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))`
82.7%	3	`(sin.f64 th)`
88.4%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
73.7%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
72.9%	3	`(sin.f64 kx)`
79.6%	2	`(sin.f64 ky)`
82.8%	2	`th`
79.8%	2	`ky`
76.3%	4	`kx`
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	`(sin.f64 th)`
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	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.6%	1	`(sin.f64 kx)`
99.6%	1	`(sin.f64 ky)`
99.6%	1	`th`
99.6%	1	`ky`
99.6%	1	`kx`
99.7%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
99.7%	1	`(sin.f64 th)`
99.7%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
99.7%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.7%	1	`(sin.f64 kx)`
99.7%	1	`(sin.f64 ky)`
99.7%	1	`th`
99.7%	1	`ky`
99.7%	1	`kx`

Compiler

Compiled 4 129 to 1 093 computations (73.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9999999998354784	1.0
0.0ms	0.4132174554627381	0.467455180750566
0.0ms	-0.20865977518463047	-0.12396696098187632
0.0ms	-0.9841765212746224	-0.9617063783269848

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9999999998354784	1.0
0.0ms	0.4132174554627381	0.467455180750566
0.0ms	-0.20865977518463047	-0.12396696098187632
0.0ms	-0.9841765212746224	-0.9617063783269848

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch25.0ms (0.3%)

Memory

7.6MiB live, 54.2MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	0.3912937333889558	640.3545654787763

Samples

18.0ms

128×

valid

Compiler

Compiled 411 to 282 computations (31.4% saved)

Precisions

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

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

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

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

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

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

adjust: 0.0ms (0% of total)

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

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.3912937333889558	640.3545654787763

Compiler

Compiled 411 to 282 computations (31.4% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.015003752067047932	1.303508744025106e-306

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.015003752067047932	1.303508744025106e-306

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.12396696098187632	-0.11015599305262293

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.1573338955370182e-6	0.3171811332175662
0.0ms	-0.12396696098187632	-0.11015599305262293

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.1573338955370182e-6	0.3171811332175662
0.0ms	-0.12396696098187632	-0.11015599305262293

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.1573338955370182e-6	0.3171811332175662
0.0ms	-0.12396696098187632	-0.11015599305262293

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1573338955370182e-6	0.3171811332175662

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1573338955370182e-6	0.3171811332175662

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.204246029980423e-18	9.946387147532306e-9
0.0ms	4.830526749965657e-152	1.7035597896701424e-146

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.204246029980423e-18	9.946387147532306e-9
0.0ms	4.830526749965657e-152	1.7035597896701424e-146

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.204246029980423e-18	9.946387147532306e-9
0.0ms	4.830526749965657e-152	1.7035597896701424e-146

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.204246029980423e-18	9.946387147532306e-9
0.0ms	4.830526749965657e-152	1.7035597896701424e-146

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	4.204246029980423e-18	9.946387147532306e-9

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	4.204246029980423e-18	9.946387147532306e-9

Compiler

Compiled 19 to 19 computations (0% saved)

derivations850.0ms (10.4%)

Memory

31.3MiB live, 1 176.2MiB allocated; 189ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 933 to 182 computations (90.6% saved)

preprocess751.0ms (9.1%)

Memory

46.7MiB live, 1 400.1MiB allocated; 227ms collecting garbage

Remove

(negabs th)

(negabs ky)

(abs kx)

Compiler

Compiled 17 311 to 7 265 computations (58% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze197.0ms (2.4%)

sample1.6s (18.9%)

preprocess49.0ms (0.6%)

series63.0ms (0.8%)

rewrite196.0ms (2.4%)

eval39.0ms (0.5%)

prune26.0ms (0.3%)

series278.0ms (3.4%)

rewrite322.0ms (3.9%)

eval134.0ms (1.6%)

prune60.0ms (0.7%)

series94.0ms (1.1%)

rewrite214.0ms (2.6%)

eval169.0ms (2.1%)

prune59.0ms (0.7%)

series74.0ms (0.9%)

rewrite207.0ms (2.5%)

eval72.0ms (0.9%)

prune90.0ms (1.1%)

regimes2.7s (32.6%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch25.0ms (0.3%)

bsearch2.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations850.0ms (10.4%)

preprocess751.0ms (9.1%)

end0.0ms (0%)

Profiling