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

start0.0ms (0%)

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

analyze223.0ms (2.7%)

Memory

-31.4MiB live, 355.5MiB allocated; 89ms 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.9s (23.6%)

Memory

93.9MiB live, 2 290.4MiB allocated; 422ms collecting garbage

Samples

1.6s

8 256×

valid

Precisions

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

ival-sin: 863.0ms (65.5% of total)

ival-pow2: 272.0ms (20.6% of total)

ival-mult!: 68.0ms (5.2% of total)

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

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

ival-add!: 22.0ms (1.7% of total)

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess64.0ms (0.8%)

Memory

1.3MiB live, 46.3MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

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

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 30 to 26 computations (13.3% saved)

series37.0ms (0.4%)

Memory

-42.2MiB live, 57.8MiB allocated; 10ms collecting garbage

Counts

13 → 68

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
10.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)
4.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)
3.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)

rewrite177.0ms (2.1%)

Memory

52.7MiB live, 325.5MiB allocated; 34ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	431	3117
0	447	2771
1	2671	2522
0	8498	2184

Stop Event

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

Counts

81 → 173

Calls

Call 1

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

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

eval73.0ms (0.9%)

Memory: -29.1MiB live, 43.8MiB allocated; 95ms collecting garbage
Compiler: Compiled 2 649 to 1 007 computations (62% saved)

prune28.0ms (0.3%)

Memory

-13.8MiB live, 35.8MiB allocated; 10ms collecting garbage

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	140	24	164
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	141	24	165

Accuracy

99.9%

Counts

165 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	93.8%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal 2 binary64))))) (sin.f64 th))
	67.7%	(.f64 (/.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))) #s(literal 2 binary64))))) (sin.f64 th))
	36.5%	(.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))
	80.8%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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))
	85.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (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))))))) (sin.f64 th))
	74.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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)))))))) (sin.f64 th))
▶	48.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))))) #s(approx (sin th) th))
	85.2%	(.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))
	89.8%	(*.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))
	52.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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)))))))) (sin.f64 th))
	42.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	30.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))))))) (sin.f64 th))
▶	31.3%	(.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) kx))))))) (sin.f64 th))
	29.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
	34.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
▶	65.6%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64))) #s(literal 2 binary64))))) (sin.f64 th))
	53.3%	(*.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.7%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	31.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky)))
▶	30.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	47.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))

Compiler

Compiled 934 to 844 computations (9.6% saved)

series165.0ms (2%)

Memory

10.0MiB live, 151.2MiB allocated; 27ms collecting garbage

Counts

38 → 193

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

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

Calls

9 calls:

Time	Variable		Point	Expression
86.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) (sin kx)) (* (sin th) ky) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (sin th)) (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (exp (* (log (sin ky)) 1)) (* (log (sin ky)) 1) (log (sin ky)) 1 (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2))) (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)) (pow (exp (* (log (sin ky)) 1)) 2))
28.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) (sin kx)) (* (sin th) ky) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (sin th)) (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (exp (* (log (sin ky)) 1)) (* (log (sin ky)) 1) (log (sin ky)) 1 (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2))) (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)) (pow (exp (* (log (sin ky)) 1)) 2))
7.0ms	kx	@	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) (sin kx)) (* (sin th) ky) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (sin th)) (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (exp (* (log (sin ky)) 1)) (* (log (sin ky)) 1) (log (sin ky)) 1 (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2))) (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)) (pow (exp (* (log (sin ky)) 1)) 2))
5.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) (sin kx)) (* (sin th) ky) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (sin th)) (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (exp (* (log (sin ky)) 1)) (* (log (sin ky)) 1) (log (sin ky)) 1 (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2))) (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)) (pow (exp (* (log (sin ky)) 1)) 2))
4.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) (sin kx)) (* (sin th) ky) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (sin th)) (/ (exp (* (log (sin ky)) 1)) (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)))) (exp (* (log (sin ky)) 1)) (* (log (sin ky)) 1) (log (sin ky)) 1 (sqrt (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2))) (+ (pow (sin kx) 2) (pow (exp (* (log (sin ky)) 1)) 2)) (pow (exp (* (log (sin ky)) 1)) 2))

rewrite238.0ms (2.9%)

Memory

-5.8MiB live, 273.2MiB allocated; 35ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	790	9699
0	855	7726
1	4384	7142
0	8475	6785

Stop Event

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

Counts

231 → 914

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

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

eval72.0ms (0.9%)

Memory: 23.0MiB live, 169.6MiB allocated; 18ms collecting garbage
Compiler: Compiled 7 338 to 2 618 computations (64.3% saved)

prune69.0ms (0.8%)

Memory

-16.2MiB live, 131.1MiB allocated; 27ms collecting garbage

Pruning

61 alts after pruning (60 fresh and 1 done)

	Pruned	Kept	Total
New	509	51	560
Fresh	10	9	19
Picked	4	1	5
Done	0	0	0
Total	523	61	584

Accuracy

100.0%

Counts

584 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	31.2%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	47.4%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	31.3%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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) kx))))))) (sin.f64 th))
	28.2%	(.f64 (/.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.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) kx))))))) (sin.f64 th))
	34.6%	(*.f64 (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64))))))
	10.3%	(.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 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) kx))))))) (sin.f64 th))
	50.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(approx (sin th) th))
	80.8%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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))
	31.3%	(.f64 (/.f64 (sin.f64 ky) (/.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 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	85.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (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))))))) (sin.f64 th))
	25.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
▶	31.7%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	39.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	89.8%	(*.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))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 ky ky)))))))) (sin.f64 th))
	31.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	16.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) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	16.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) (sin.f64 (+.f64 (neg.f64 (+.f64 kx kx)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	30.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 ky ky))))))) (sin.f64 th))
	17.3%	(.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) kx))))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	9.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 kx))) (+.f64 (neg.f64 (*.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	2.5%	(.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 kx))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	19.2%	(.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 kx)))) (*.f64 kx kx))))) (sin.f64 th))
	29.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
	34.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	10.3%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	26.2%	(.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))))) #s(approx (sin th) th))
	26.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	53.3%	(*.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))
	29.7%	(*.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))))) #s(approx (sin th) th))
	26.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) kx))))))) (sin.f64 th))
▶	99.6%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))))
	19.9%	(.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	87.7%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky))))
✓	99.7%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	58.0%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	36.5%	(.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	75.1%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
	34.5%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx))))
	50.5%	(.f64 (sin.f64 ky) (/.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)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
▶	50.5%	(.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)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	50.7%	(.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)))))
	50.4%	(.f64 (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)))
	71.1%	(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 ky))))))
	31.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	54.9%	(.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)))))
	62.2%	(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky)))
	12.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
▶	26.5%	#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))))))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #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.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #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))))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))
	20.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) #s(approx (sin kx) kx)))
	16.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 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)) ky) (sin.f64 kx)))
	16.7%	#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) (sin.f64 kx)))
	16.8%	#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)) (sin.f64 kx)))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 th ky)) (sin.f64 kx)))
	31.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (sin.f64 kx))))
▶	18.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky (/.f64 th (sin.f64 kx)))))

Compiler

Compiled 2 550 to 2 331 computations (8.6% saved)

series56.0ms (0.7%)

Memory

1.7MiB live, 91.7MiB allocated; 11ms collecting garbage

Counts

42 → 217

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite216.0ms (2.6%)

Memory

2.8MiB live, 286.9MiB allocated; 40ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	924	10247
0	987	8280
1	5233	7708
0	8161	7317

Stop Event

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

Counts

259 → 633

Calls

Call 1

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

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

eval58.0ms (0.7%)

Memory: 5.3MiB live, 141.3MiB allocated; 10ms collecting garbage
Compiler: Compiled 6 418 to 2 272 computations (64.6% saved)

prune82.0ms (1%)

Memory

6.0MiB live, 194.6MiB allocated; 25ms collecting garbage

Pruning

81 alts after pruning (76 fresh and 5 done)

	Pruned	Kept	Total
New	412	34	446
Fresh	13	42	55
Picked	1	4	5
Done	0	1	1
Total	426	81	507

Accuracy

100.0%

Counts

507 → 81

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	31.2%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	47.4%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	31.2%	(/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) kx) (sin.f64 ky)))
▶	99.5%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	28.2%	(.f64 (/.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.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) kx))))))) (sin.f64 th))
	34.6%	(*.f64 (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64))))))
	10.3%	(.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 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) kx))))))) (sin.f64 th))
	50.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(approx (sin th) th))
	80.8%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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))
	31.3%	(.f64 (/.f64 (sin.f64 ky) (/.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 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	85.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (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))))))) (sin.f64 th))
	31.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -2 binary64))))) #s(approx (sin th) th))
	18.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) #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 (sin th) th))
	16.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) #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 (sin th) th))
	18.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	39.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 ky ky)))))))) (sin.f64 th))
	22.4%	(.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) #s(approx (sin th) th))
	31.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	17.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	16.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) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	16.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) (sin.f64 (+.f64 (neg.f64 (+.f64 kx kx)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	30.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 ky ky))))))) (sin.f64 th))
	17.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	9.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 kx))) (+.f64 (neg.f64 (*.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	19.2%	(.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 kx)))) (*.f64 kx kx))))) (sin.f64 th))
	29.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
	34.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	10.3%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	26.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	29.7%	(*.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))))) #s(approx (sin th) th))
	26.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) kx))))))) (sin.f64 th))
	99.4%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
✓	99.6%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))))
	29.4%	(.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)) (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))))) (sin.f64 ky))))
	34.5%	(.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)) (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))))) (sin.f64 kx))))
	50.6%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky))))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	62.2%	(*.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))))))
	19.9%	(.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	87.7%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky))))
✓	99.7%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
▶	58.0%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	36.5%	(.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	34.5%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx))))
	50.5%	(.f64 (sin.f64 ky) (/.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)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
✓	50.5%	(.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)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	50.7%	(.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) #s(approx ( (+ (* (* th th) -1/6) 1) th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	71.1%	(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 ky))))))
	17.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sin.f64 ky))) #s(approx (sin th) th))
	31.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	18.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) th))
	54.9%	(.f64 #s(approx (/ 1 (/ 1 (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 (/ 1 (/ 1 (sin ky))) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))))
	62.2%	(*.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (/ 1 (sin ky))) ky))))
	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky)))
✓	26.5%	#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))))))
	1.8%	#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) #s(approx ( (cos (+ kx kx)) 1/2) #s(literal 1/2 binary64))))))
	17.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 #s(approx (- 1/2 ( (cos (+ kx kx)) 1/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))))))
	17.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 #s(approx (- 1/2 ( (cos (+ kx kx)) 1/2)) (*.f64 kx kx)))))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #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.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #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))))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))
	20.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) #s(approx (sin kx) kx)))
▶	16.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 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)) ky) (sin.f64 kx)))
	16.7%	#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) (sin.f64 kx)))
	16.8%	#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)) (sin.f64 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 th ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 th ky)) (sin.f64 kx)))
	31.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (sin.f64 kx))))
	18.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky (/.f64 th (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
	15.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
✓	18.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky (/.f64 th (sin.f64 kx)))))
	15.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))))
	13.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))))))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) (.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))))))
	14.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) (.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))))))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) (.f64 (fma.f64 (.f64 kx kx) #s(literal -1/6 binary64) #s(literal 1 binary64)) kx))))))
	9.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky #s(approx (/ th (sin kx)) (/.f64 (fma.f64 (.f64 (*.f64 kx kx) th) #s(literal 1/6 binary64) th) kx)))))
	14.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky #s(approx (/ th (sin kx)) (/.f64 th kx)))))
	8.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) #s(approx (* ky (/ th (sin kx))) (/.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 kx kx)) (.f64 th ky) (.f64 th ky)) kx))))
▶	13.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) #s(approx (* ky (/ th (sin kx))) (/.f64 (*.f64 th ky) kx))))

Compiler

Compiled 3 570 to 3 245 computations (9.1% saved)

series71.0ms (0.9%)

Memory

-5.4MiB live, 144.4MiB allocated; 22ms collecting garbage

Counts

37 → 178

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite277.0ms (3.4%)

Memory

46.8MiB live, 389.1MiB allocated; 112ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	897	9975
0	950	7673
1	5648	7435
0	8090	7112

Stop Event

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

Counts

215 → 504

Calls

Call 1

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

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

eval78.0ms (0.9%)

Memory: 4.0MiB live, 99.2MiB allocated; 38ms collecting garbage
Compiler: Compiled 6 906 to 1 954 computations (71.7% saved)

prune83.0ms (1%)

Memory

9.2MiB live, 148.6MiB allocated; 9ms collecting garbage

Pruning

83 alts after pruning (77 fresh and 6 done)

	Pruned	Kept	Total
New	432	22	454
Fresh	16	55	71
Picked	3	2	5
Done	1	4	5
Total	452	83	535

Accuracy

100.0%

Counts

535 → 83

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	54.7%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky)))
	31.2%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	47.4%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
✓	31.2%	(/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) kx) (sin.f64 ky)))
	17.9%	(/.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)) #s(approx (sin th) th)) (hypot.f64 #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) 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))))
	18.7%	(/.f64 (.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) th)) (hypot.f64 #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))
	25.0%	(/.f64 (.f64 #s(approx (sin ky) ky) #s(approx (sin th) th)) (hypot.f64 #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) kx) #s(approx (sin ky) ky)))
	99.6%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))))
	31.3%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
	55.2%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (/.f64 #s(literal 1 binary64) #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)))))
	64.4%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sin ky) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	70.0%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	29.4%	(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx ( (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))))
	99.5%	(/.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	30.6%	(/.f64 #s(approx (* (sin ky) (sin th)) (.f64 (sin.f64 th) ky)) (hypot.f64 #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) kx) (sin.f64 ky)))
	50.5%	(/.f64 #s(approx (* 1 (sin th)) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	28.2%	(.f64 (/.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.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) kx))))))) (sin.f64 th))
	34.6%	(*.f64 (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64))))))
	10.3%	(.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 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) kx))))))) (sin.f64 th))
	50.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(approx (sin th) th))
	80.8%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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))
	31.3%	(.f64 (/.f64 (sin.f64 ky) (/.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 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	31.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -2 binary64))))) #s(approx (sin th) th))
	18.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	39.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	17.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	16.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) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	16.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) (sin.f64 (+.f64 (neg.f64 (+.f64 kx kx)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	30.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 ky ky))))))) (sin.f64 th))
	17.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	9.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 kx))) (+.f64 (neg.f64 (*.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	19.2%	(.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 kx)))) (*.f64 kx kx))))) (sin.f64 th))
	34.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	10.3%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	29.7%	(*.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))))) #s(approx (sin th) th))
	26.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) kx))))))) (sin.f64 th))
	99.4%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
	29.4%	(.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)) (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))))) (sin.f64 ky))))
	34.5%	(.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)) (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))))) (sin.f64 kx))))
	50.6%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky))))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	19.9%	(.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	87.7%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky))))
✓	99.7%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	36.5%	(.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	34.5%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx))))
	50.5%	(.f64 (sin.f64 ky) (/.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)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
✓	50.5%	(.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)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	50.7%	(.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) #s(approx ( (+ (* (* th th) -1/6) 1) th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	29.4%	(.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))))
	31.3%	(.f64 (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 kx kx)) #s(literal 1/2 binary64)))))))
	17.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sin.f64 ky))) #s(approx (sin th) th))
	31.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	54.9%	(.f64 #s(approx (/ 1 (/ 1 (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 (/ 1 (/ 1 (sin ky))) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))))
	62.2%	(*.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (/ 1 (sin ky))) ky))))
	36.8%	(.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 #s(approx (sin kx) kx) #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)))))
	43.4%	(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) #s(approx (sin ky) ky))))
	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky)))
✓	26.5%	#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))))))
	17.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 #s(approx (- 1/2 ( (cos (+ kx kx)) 1/2)) (*.f64 kx kx)))))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #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.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #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))))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))))
	20.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) #s(approx (sin kx) kx)))
	16.7%	#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) (sin.f64 kx)))
	2.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 #s(approx (+ (* (- (* (* th th) 1/120) 1/6) (* th th)) 1) (.f64 (.f64 (.f64 th th) (.f64 th th)) (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 th th))))) th)) ky) (sin.f64 kx)))
	11.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 #s(approx (+ (* (- (* (* th th) 1/120) 1/6) (* th th)) 1) (.f64 (.f64 (.f64 th th) (.f64 th th)) #s(literal 1/120 binary64))) th)) ky) (sin.f64 kx)))
	2.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) #s(approx ( (+ (* (- (* (* th th) 1/120) 1/6) (* th th)) 1) th) (.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (.f64 th th))) (pow.f64 th #s(literal 5 binary64))))) ky) (sin.f64 kx)))
	17.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) #s(approx ( (+ (* (- (* (* th th) 1/120) 1/6) (* th th)) 1) th) th)) ky) (sin.f64 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 th ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	31.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (sin.f64 kx))))
	18.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky (/.f64 th (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
	15.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
✓	18.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky (/.f64 th (sin.f64 kx)))))
	15.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) (.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))))))
	14.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) (.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))))))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky (/.f64 th #s(approx (sqrt (- 1/2 ( (cos (+ kx kx)) 1/2))) (.f64 (fma.f64 (.f64 kx kx) #s(literal -1/6 binary64) #s(literal 1 binary64)) kx))))))
	9.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (.f64 ky #s(approx (/ th (sin kx)) (/.f64 (fma.f64 (.f64 (*.f64 kx kx) th) #s(literal 1/6 binary64) th) kx)))))
	14.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) (*.f64 ky #s(approx (/ th (sin kx)) (/.f64 th kx)))))
	8.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) #s(approx (* ky (/ th (sin kx))) (/.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 kx kx)) (.f64 th ky) (.f64 th ky)) kx))))
✓	13.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) #s(approx (* ky (/ th (sin kx))) (/.f64 (*.f64 th ky) kx))))
	14.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin th) ky) (sin kx)) #s(approx (* ky (/ th (sin kx))) (*.f64 th (/.f64 ky kx)))))

Compiler

Compiled 3 422 to 2 383 computations (30.4% saved)

regimes964.0ms (11.7%)

Memory

-61.8MiB live, 632.7MiB allocated; 957ms collecting garbage

Counts

132 → 1

Calls

Call 1

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

Calls

9 calls:

561.0ms	(sin.f64 kx)
92.0ms	th
60.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
48.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))
45.0ms	(sin.f64 th)

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 40 to 51 computations (-27.5% saved)

regimes309.0ms (3.7%)

Memory

9.2MiB live, 424.4MiB allocated; 93ms collecting garbage

Counts

107 → 3

Calls

Call 1

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

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

Outputs

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

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

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

Calls

9 calls:

62.0ms	kx
35.0ms	th
31.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))
30.0ms	ky
30.0ms	(sin.f64 kx)

Results

Accuracy	Segments	Branch
80.6%	3	`(sin.f64 th)`
79.5%	3	`(sin.f64 kx)`
79.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
79.4%	2	`(sin.f64 ky)`
83.1%	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)))))`
77.1%	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))`
79.5%	2	`kx`
79.4%	2	`ky`
79.8%	2	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes43.0ms (0.5%)

Memory

-6.4MiB live, 38.8MiB allocated; 2ms collecting garbage

Counts

98 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

38.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes33.0ms (0.4%)

Memory

-0.3MiB live, 44.7MiB allocated; 4ms collecting garbage

Counts

97 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

28.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes32.0ms (0.4%)

Memory

-1.5MiB live, 48.6MiB allocated; 9ms collecting garbage

Counts

96 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

26.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes28.0ms (0.3%)

Memory

6.8MiB live, 50.1MiB allocated; 4ms collecting garbage

Counts

88 → 3

Calls

Call 1

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

Outputs

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

Calls

1 calls:

23.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
83.0%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes27.0ms (0.3%)

Memory

11.0MiB live, 55.4MiB allocated; 4ms collecting garbage

Counts

85 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

23.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
83.0%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes25.0ms (0.3%)

Memory

-3.5MiB live, 41.9MiB allocated; 3ms collecting garbage

Counts

84 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

21.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
82.8%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes118.0ms (1.4%)

Memory

-2.1MiB live, 187.6MiB allocated; 24ms collecting garbage

Counts

82 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

26.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
25.0ms	th
23.0ms	kx
22.0ms	(sin.f64 ky)
18.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
79.4%	2	`(sin.f64 ky)`
66.5%	2	`kx`
66.8%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
64.4%	1	`th`
79.4%	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 20 to 27 computations (-35% saved)

regimes137.0ms (1.7%)

Memory

12.5MiB live, 208.3MiB allocated; 30ms collecting garbage

Counts

77 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
64.4%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
64.4%	1	`(sin.f64 kx)`
64.4%	1	`(sin.f64 th)`
69.1%	3	`ky`
71.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)))))`
71.9%	2	`(sin.f64 ky)`

Compiler

Compiled 34 to 39 computations (-14.7% saved)

regimes33.0ms (0.4%)

Memory

-11.1MiB live, 40.4MiB allocated; 4ms collecting garbage

Counts

55 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 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)))))
14.0ms	(sin.f64 ky)

Results

Accuracy	Segments	Branch
69.6%	2	`(sin.f64 ky)`
69.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 14 to 15 computations (-7.1% saved)

regimes164.0ms (2%)

Memory

-4.4MiB live, 133.7MiB allocated; 8ms collecting garbage

Counts

52 → 4

Calls

Call 1

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

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

Calls

9 calls:

31.0ms	kx
28.0ms	(sin.f64 kx)
23.0ms	(sin.f64 ky)
13.0ms	(sin.f64 th)
13.0ms	ky

Results

Accuracy	Segments	Branch
49.8%	3	`(sin.f64 th)`
60.1%	3	`(sin.f64 kx)`
48.8%	2	`th`
53.4%	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))`
59.9%	2	`kx`
60.0%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
50.7%	3	`ky`
50.8%	2	`(sin.f64 ky)`
63.7%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes14.0ms (0.2%)

Memory

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

Counts

47 → 4

Calls

Call 1

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

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

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
63.7%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes27.0ms (0.3%)

Memory

-5.1MiB live, 44.1MiB allocated; 5ms collecting garbage

Counts

45 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

14.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)))))
11.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

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

Compiler

Compiled 16 to 17 computations (-6.3% saved)

regimes53.0ms (0.6%)

Memory

-22.5MiB live, 116.0MiB allocated; 9ms collecting garbage

Counts

44 → 3

Calls

Call 1

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

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

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

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

Calls

4 calls:

14.0ms	(sin.f64 kx)
13.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
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)))))
11.0ms	kx

Results

Accuracy	Segments	Branch
57.0%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
55.6%	3	`(sin.f64 kx)`
52.2%	2	`kx`
54.0%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`

Compiler

Compiled 19 to 24 computations (-26.3% saved)

regimes23.0ms (0.3%)

Memory

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

Counts

40 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

10.0ms	(sin.f64 kx)
10.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.3%	3	`(sin.f64 kx)`
55.0%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 14 to 15 computations (-7.1% saved)

regimes15.0ms (0.2%)

Memory

-27.0MiB live, 21.6MiB allocated; 6ms collecting garbage

Counts

37 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

12.0ms

(sin.f64 kx)

Results

Accuracy	Segments	Branch
55.3%	3	`(sin.f64 kx)`

Compiler

Compiled 2 to 4 computations (-100% saved)

regimes59.0ms (0.7%)

Memory

15.3MiB live, 108.1MiB allocated; 4ms collecting garbage

Counts

35 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
43.4%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
43.4%	1	`(sin.f64 ky)`
49.3%	2	`kx`
49.3%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
45.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)))))`
49.3%	3	`(sin.f64 kx)`

Compiler

Compiled 36 to 41 computations (-13.9% saved)

regimes12.0ms (0.1%)

Memory

-24.1MiB live, 22.4MiB allocated; 2ms collecting garbage

Counts

32 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

10.0ms

kx

Results

Accuracy	Segments	Branch
49.3%	2	`kx`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes69.0ms (0.8%)

Memory

29.9MiB live, 124.5MiB allocated; 23ms collecting garbage

Counts

22 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

15.0ms	th
10.0ms	(sin.f64 ky)
6.0ms	(sin.f64 th)
6.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))
6.0ms	kx

Results

Accuracy	Segments	Branch
31.7%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
31.7%	3	`(sin.f64 ky)`
31.8%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
33.4%	4	`(sin.f64 kx)`
31.8%	3	`(sin.f64 th)`
32.1%	2	`th`
30.5%	2	`ky`
33.2%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
33.3%	3	`kx`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes37.0ms (0.5%)

Memory

-17.4MiB live, 76.4MiB allocated; 4ms collecting garbage

Counts

12 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
25.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))`
27.0%	2	`(sin.f64 ky)`
29.4%	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)))))`
25.0%	1	`(sin.f64 th)`
29.0%	2	`(sin.f64 kx)`
27.4%	2	`ky`
28.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
28.6%	2	`kx`
25.0%	1	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes24.0ms (0.3%)

Memory

-4.7MiB live, 45.2MiB allocated; 5ms collecting garbage

Counts

9 → 1

Calls

Call 1

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

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

Calls

7 calls:

6.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	kx
3.0ms	ky

Results

Accuracy	Segments	Branch
25.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))`
25.0%	1	`(sin.f64 ky)`
25.0%	1	`ky`
25.0%	1	`kx`
25.0%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
25.0%	1	`(sin.f64 kx)`
25.0%	1	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 37 to 44 computations (-18.9% saved)

regimes20.0ms (0.2%)

Memory

-7.2MiB live, 39.6MiB allocated; 3ms collecting garbage

Counts

5 → 1

Calls

Call 1

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

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes12.0ms (0.1%)

Memory

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

Accuracy

Total -0.9b remaining (-1.6%)

Threshold costs -0.9b (-1.6%)

Counts

2 → 1

Calls

Call 1

Inputs

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

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

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

Calls

9 calls:

1.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))
1.0ms	ky
1.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)))))
1.0ms	(sin.f64 th)
1.0ms	(sin.f64 ky)

Results

Accuracy	Segments	Branch
14.5%	1	`(sin.f64 th)`
14.5%	1	`(sin.f64 kx)`
14.5%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
14.5%	1	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
14.5%	1	`kx`
14.5%	1	`th`
14.5%	1	`(sin.f64 ky)`
14.5%	1	`ky`
14.5%	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 40 to 51 computations (-27.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.3309297143329263	4.134812576410663e-301
0.0ms	-0.9770781100313293	-0.9638953828681074

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263
0.0ms	-0.9999999820416707	-0.9770781100313293

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263
0.0ms	-0.9999999820416707	-0.9770781100313293

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263
0.0ms	-0.9999999820416707	-0.9770781100313293

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263
0.0ms	-0.9999999820416707	-0.9770781100313293

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263
0.0ms	-0.9999999820416707	-0.9770781100313293

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263
0.0ms	-0.9770781100313293	-0.9638953828681074

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.008819888993029362	8.038473015130436e-305

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.37928168726971506	-0.3309297143329263

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	4.212849901228677e-9	0.015090937029190106
0.0ms	1.3937176733108721e-210	2.657976326524848e-209
0.0ms	-0.3309297143329263	4.134812576410663e-301

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	4.212849901228677e-9	0.015090937029190106
0.0ms	1.3937176733108721e-210	2.657976326524848e-209
0.0ms	-0.3309297143329263	4.134812576410663e-301

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.00036943766459814797	0.0006542750956427701

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.212849901228677e-9	0.015090937029190106
0.0ms	-0.919904433100625	-0.8976607968905769

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.014119468232764583	0.07783744740458443
0.0ms	-0.051313107921679854	-0.025578801685043225

Compiler

Compiled 19 to 18 computations (5.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.014119468232764583	0.07783744740458443
0.0ms	-0.051313107921679854	-0.025578801685043225

Compiler

Compiled 19 to 18 computations (5.3% saved)

bsearch24.0ms (0.3%)

Memory

-13.7MiB live, 32.9MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
22.0ms	1.0023318158519256e+30	1.4778292404621207e+32

Samples

16.0ms

112×

valid

Compiler

Compiled 320 to 298 computations (6.9% saved)

Precisions

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.0023318158519256e+30	1.4778292404621207e+32

Compiler

Compiled 306 to 284 computations (7.2% saved)

bsearch20.0ms (0.2%)

Memory

-17.8MiB live, 28.4MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	3.290608816192012e+30	3.7640357172129196e+31

Samples

15.0ms

96×

valid

Compiler

Compiled 253 to 240 computations (5.1% saved)

Precisions

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

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

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.04970544384078962	0.2755831453093372

Compiler

Compiled 18 to 19 computations (-5.6% saved)

derivations1.0s (12.7%)

Memory

40.3MiB live, 859.1MiB allocated; 201ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 387 to 210 computations (45.7% saved)

preprocess854.0ms (10.4%)

Memory

27.8MiB live, 1 163.8MiB allocated; 247ms collecting garbage

Remove

(negabs th)

(negabs ky)

Compiler

Compiled 9 934 to 7 797 computations (21.5% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze223.0ms (2.7%)

sample1.9s (23.6%)

preprocess64.0ms (0.8%)

series37.0ms (0.4%)

rewrite177.0ms (2.1%)

eval73.0ms (0.9%)

prune28.0ms (0.3%)

series165.0ms (2%)

rewrite238.0ms (2.9%)

eval72.0ms (0.9%)

prune69.0ms (0.8%)

series56.0ms (0.7%)

rewrite216.0ms (2.6%)

eval58.0ms (0.7%)

prune82.0ms (1%)

series71.0ms (0.9%)

rewrite277.0ms (3.4%)

eval78.0ms (0.9%)

prune83.0ms (1%)

regimes964.0ms (11.7%)

regimes309.0ms (3.7%)

regimes43.0ms (0.5%)

regimes33.0ms (0.4%)

regimes32.0ms (0.4%)

regimes28.0ms (0.3%)

regimes27.0ms (0.3%)

regimes25.0ms (0.3%)

regimes118.0ms (1.4%)

regimes137.0ms (1.7%)

regimes33.0ms (0.4%)

regimes164.0ms (2%)

regimes14.0ms (0.2%)

regimes27.0ms (0.3%)

regimes53.0ms (0.6%)

regimes23.0ms (0.3%)

regimes15.0ms (0.2%)

regimes59.0ms (0.7%)

regimes12.0ms (0.1%)

regimes69.0ms (0.8%)

regimes37.0ms (0.5%)

regimes24.0ms (0.3%)

regimes20.0ms (0.2%)

regimes12.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch24.0ms (0.3%)

bsearch1.0ms (0%)

bsearch20.0ms (0.2%)

bsearch0.0ms (0%)

derivations1.0s (12.7%)

preprocess854.0ms (10.4%)

end0.0ms (0%)

Profiling