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

start0.0ms (0%)

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

analyze238.0ms (3%)

Memory

-14.3MiB live, 248.7MiB allocated; 87ms 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 (19.9%)

Memory

50.4MiB live, 1 774.4MiB allocated; 405ms collecting garbage

Samples

1.2s

8 256×

valid

Precisions

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

ival-sin: 556.0ms (61.6% of total)

ival-pow2: 183.0ms (20.3% of total)

ival-sqrt: 55.0ms (6.1% of total)

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

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

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

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess55.0ms (0.7%)

Memory

-13.7MiB live, 82.5MiB allocated; 18ms 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)

series35.0ms (0.4%)

Memory

15.5MiB live, 106.3MiB allocated; 10ms 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
6.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)
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)
5.0ms	th	@	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)
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)

rewrite267.0ms (3.3%)

Memory

10.4MiB live, 375.1MiB allocated; 111ms 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))

eval43.0ms (0.5%)

Memory: 1.3MiB live, 95.8MiB allocated; 35ms collecting garbage
Compiler: Compiled 6 347 to 1 227 computations (80.7% saved)

prune24.0ms (0.3%)

Memory

29.6MiB live, 74.7MiB 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)

series318.0ms (4%)

Memory

-9.3MiB live, 551.0MiB allocated; 178ms 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
91.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)
64.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)
58.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)
28.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)
27.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)

rewrite253.0ms (3.2%)

Memory

48.0MiB live, 415.3MiB allocated; 67ms 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))

eval127.0ms (1.6%)

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

prune142.0ms (1.8%)

Memory

-49.8MiB live, 151.9MiB allocated; 150ms 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)

series60.0ms (0.8%)

Memory

6.8MiB live, 147.6MiB allocated; 24ms 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
13.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)))))
10.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)))))
8.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)))))
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)))))
5.0ms	kx	@	-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)))))

rewrite209.0ms (2.6%)

Memory

40.4MiB live, 357.6MiB allocated; 45ms 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))

eval173.0ms (2.2%)

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

prune96.0ms (1.2%)

Memory

25.9MiB live, 165.5MiB allocated; 60ms 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)

series45.0ms (0.6%)

Memory

-36.8MiB live, 105.2MiB allocated; 19ms 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
13.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))
5.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))
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))

rewrite201.0ms (2.5%)

Memory

54.5MiB live, 327.5MiB allocated; 38ms 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))

eval71.0ms (0.9%)

Memory: -6.3MiB live, 182.1MiB allocated; 26ms collecting garbage
Compiler: Compiled 16 397 to 2 080 computations (87.3% saved)

prune124.0ms (1.6%)

Memory

-14.4MiB live, 227.1MiB allocated; 64ms 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 6 215 to 2 288 computations (63.2% saved)

regimes343.0ms (4.3%)

Memory

45.3MiB live, 736.0MiB allocated; 117ms collecting garbage

Counts

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

9 calls:

55.0ms	(sin.f64 kx)
53.0ms	(sin.f64 th)
39.0ms	ky
34.0ms	th
33.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

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

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes842.0ms (10.5%)

Memory

-178.4MiB live, 465.1MiB allocated; 1.0s collecting garbage

Counts

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

Calls

9 calls:

567.0ms	th
52.0ms	kx
39.0ms	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
37.0ms	(sin.f64 ky)
37.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

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

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes288.0ms (3.6%)

Memory

9.3MiB live, 436.8MiB allocated; 74ms collecting garbage

Counts

93 → 5

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
82.7%	3	`(sin.f64 th)`
72.9%	3	`(sin.f64 kx)`
73.7%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
79.6%	2	`(sin.f64 ky)`
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))`
76.3%	4	`kx`
79.8%	2	`ky`
82.8%	2	`th`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes22.0ms (0.3%)

Memory

16.7MiB live, 62.4MiB allocated; 4ms collecting garbage

Counts

70 → 5

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

Calls

1 calls:

18.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes82.0ms (1%)

Memory

-4.4MiB live, 236.2MiB allocated; 18ms collecting garbage

Counts

68 → 2

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

Calls

4 calls:

21.0ms	ky
20.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
19.0ms	(sin.f64 th)
18.0ms	th

Results

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

Compiler

Compiled 17 to 21 computations (-23.5% saved)

regimes22.0ms (0.3%)

Memory

7.3MiB live, 52.8MiB allocated; 4ms collecting garbage

Counts

60 → 2

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

Calls

1 calls:

18.0ms

ky

Results

Accuracy	Segments	Branch
79.6%	2	`ky`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes69.0ms (0.9%)

Memory

-10.9MiB live, 131.2MiB allocated; 28ms collecting garbage

Counts

59 → 2

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

Calls

3 calls:

30.0ms	(sin.f64 ky)
19.0ms	ky
18.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
79.6%	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	`ky`

Compiler

Compiled 16 to 18 computations (-12.5% saved)

regimes56.0ms (0.7%)

Memory

-7.6MiB live, 128.6MiB allocated; 13ms collecting garbage

Counts

57 → 2

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

Calls

3 calls:

18.0ms	(sin.f64 ky)
17.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
14.0ms	ky

Results

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

Compiler

Compiled 16 to 18 computations (-12.5% saved)

regimes92.0ms (1.2%)

Memory

9.6MiB live, 195.1MiB allocated; 27ms collecting garbage

Counts

54 → 2

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 33 to 34 computations (-3% saved)

regimes67.0ms (0.8%)

Memory

-3.3MiB live, 136.8MiB allocated; 21ms collecting garbage

Counts

48 → 3

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

Calls

4 calls:

22.0ms	(sin.f64 ky)
15.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
12.0ms	(sin.f64 kx)
12.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

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

Compiler

Compiled 21 to 25 computations (-19% saved)

regimes13.0ms (0.2%)

Memory

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

Counts

45 → 3

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

Calls

1 calls:

11.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes15.0ms (0.2%)

Memory

-9.5MiB live, 36.0MiB allocated; 4ms collecting garbage

Counts

39 → 3

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

Calls

1 calls:

13.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes75.0ms (0.9%)

Memory

-23.0MiB live, 164.8MiB allocated; 18ms collecting garbage

Counts

38 → 2

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
50.2%	4	`th`
45.7%	3	`(sin.f64 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))`
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)))))`

Compiler

Compiled 34 to 37 computations (-8.8% saved)

regimes10.0ms (0.1%)

Memory

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

Counts

34 → 2

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

Calls

1 calls:

8.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes72.0ms (0.9%)

Memory

-44.2MiB live, 167.0MiB allocated; 17ms collecting garbage

Counts

33 → 3

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 39 to 44 computations (-12.8% saved)

regimes9.0ms (0.1%)

Memory

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

Counts

29 → 3

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

Calls

1 calls:

7.0ms

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

Results

Accuracy	Segments	Branch
51.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)))))`

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes9.0ms (0.1%)

Memory

-27.2MiB live, 24.0MiB allocated; 3ms collecting garbage

Counts

24 → 3

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

Calls

1 calls:

8.0ms

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

Results

Accuracy	Segments	Branch
51.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)))))`

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

21 → 3

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

Calls

1 calls:

6.0ms

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

Results

Accuracy	Segments	Branch
51.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)))))`

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes5.0ms (0.1%)

Memory

12.2MiB live, 12.3MiB allocated; 0ms collecting garbage

Counts

14 → 2

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

Calls

1 calls:

4.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes9.0ms (0.1%)

Memory

-27.5MiB live, 19.1MiB allocated; 2ms collecting garbage

Counts

12 → 2

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

Calls

2 calls:

4.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)))))
4.0ms	th

Results

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

Compiler

Compiled 14 to 14 computations (0% saved)

regimes26.0ms (0.3%)

Memory

21.5MiB live, 67.6MiB allocated; 1ms collecting garbage

Accuracy

Total -2.5b remaining (-4.8%)

Threshold costs -2.5b (-4.8%)

Counts

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

Calls

9 calls:

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

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

Compiler

Compiled 42 to 51 computations (-21.4% saved)

bsearch1.0ms (0%)

Memory

2.5MiB live, 2.5MiB 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.7MiB live, 2.7MiB 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)

bsearch27.0ms (0.3%)

Memory

-31.5MiB live, 66.0MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
25.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: 15.0ms

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

bsearch2.0ms (0%)

Memory

3.9MiB live, 3.9MiB 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)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.018928162888514406	1.9552048390688446e-306

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.018928162888514406	1.9552048390688446e-306

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

1.2MiB live, 1.2MiB 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.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.5MiB live, 1.5MiB 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.7MiB live, 1.7MiB 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

0.9MiB live, 0.9MiB 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.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.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

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

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

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

1.1MiB live, 1.1MiB 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)

derivations869.0ms (10.9%)

Memory

23.7MiB live, 1 317.5MiB allocated; 264ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 955 to 182 computations (90.7% saved)

preprocess891.0ms (11.1%)

Memory

60.8MiB live, 1 502.1MiB allocated; 365ms collecting garbage

Remove

(negabs th)

(negabs ky)

(abs kx)

Compiler

Compiled 17 509 to 7 361 computations (58% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze238.0ms (3%)

sample1.6s (19.9%)

preprocess55.0ms (0.7%)

series35.0ms (0.4%)

rewrite267.0ms (3.3%)

eval43.0ms (0.5%)

prune24.0ms (0.3%)

series318.0ms (4%)

rewrite253.0ms (3.2%)

eval127.0ms (1.6%)

prune142.0ms (1.8%)

series60.0ms (0.8%)

rewrite209.0ms (2.6%)

eval173.0ms (2.2%)

prune96.0ms (1.2%)

series45.0ms (0.6%)

rewrite201.0ms (2.5%)

eval71.0ms (0.9%)

prune124.0ms (1.6%)

regimes343.0ms (4.3%)

regimes842.0ms (10.5%)

regimes288.0ms (3.6%)

regimes22.0ms (0.3%)

regimes82.0ms (1%)

regimes22.0ms (0.3%)

regimes69.0ms (0.9%)

regimes56.0ms (0.7%)

regimes92.0ms (1.2%)

regimes67.0ms (0.8%)

regimes13.0ms (0.2%)

regimes15.0ms (0.2%)

regimes75.0ms (0.9%)

regimes10.0ms (0.1%)

regimes72.0ms (0.9%)

regimes9.0ms (0.1%)

regimes9.0ms (0.1%)

regimes7.0ms (0.1%)

regimes5.0ms (0.1%)

regimes9.0ms (0.1%)

regimes26.0ms (0.3%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch27.0ms (0.3%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch1.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%)

derivations869.0ms (10.9%)

preprocess891.0ms (11.1%)

end0.0ms (0%)

Profiling