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

start0.0ms (0%)

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

analyze956.0ms (10.8%)

Memory

-138.9MiB live, 505.9MiB allocated; 1.1s 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.8s (19.8%)

Memory

90.1MiB live, 2 145.8MiB allocated; 438ms collecting garbage

Samples

1.5s

8 256×

valid

Precisions

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

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

ival-pow2: 170.0ms (15.9% of total)

ival-add!: 74.0ms (6.9% of total)

ival-sqrt: 66.0ms (6.2% of total)

ival-div!: 44.0ms (4.1% of total)

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

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess57.0ms (0.6%)

Memory

-20.1MiB live, 71.1MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	46	166
1	142	163
2	566	163
3	3361	163

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 30 to 26 computations (13.3% saved)

series50.0ms (0.6%)

Memory

3.2MiB live, 56.9MiB allocated; 22ms collecting garbage

Counts

13 → 63

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite201.0ms (2.3%)

Memory

8.1MiB live, 240.8MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	426	3085
0	442	2885
1	3351	2637
0	8448	2293

Stop Event

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

Counts

76 → 239

Calls

Call 1

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

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

eval31.0ms (0.3%)

Memory: -7.7MiB live, 84.6MiB allocated; 7ms collecting garbage
Compiler: Compiled 3 291 to 1 166 computations (64.6% saved)

prune23.0ms (0.3%)

Memory

3.6MiB live, 56.6MiB allocated; 4ms collecting garbage

Pruning

25 alts after pruning (25 fresh and 0 done)

	Pruned	Kept	Total
New	205	25	230
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	206	25	231

Accuracy

100.0%

Counts

231 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	98.1%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	97.7%	(/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 th) (sin.f64 ky))))
	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	51.4%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (+.f64 #s(literal 1 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))))))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	86.1%	(.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))
	77.3%	(.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))
	46.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))))) #s(approx (sin th) th))
▶	77.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
	90.1%	(*.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))
	44.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	35.9%	(.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))
	36.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
	43.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))
	33.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	77.6%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))) #s(literal 1/2 binary64)))) (sin.f64 th))
	45.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	42.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	50.2%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	99.6%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) (sin.f64 th))
	97.9%	(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	99.4%	(.f64 (.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (sin.f64 th))
▶	99.5%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	36.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
▶	35.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
▶	47.8%	#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 882 to 834 computations (5.4% saved)

series97.0ms (1.1%)

Memory

21.5MiB live, 206.2MiB allocated; 24ms collecting garbage

Counts

34 → 159

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
18.0ms	ky	@	inf	((* (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) (sin th)) (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin ky) th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin ky) 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 ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
13.0ms	ky	@	0	((* (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) (sin th)) (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin ky) th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin ky) 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 ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
12.0ms	kx	@	0	((* (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) (sin th)) (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin ky) th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin ky) 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 ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
12.0ms	th	@	inf	((* (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) (sin th)) (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin ky) th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin ky) 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 ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
12.0ms	kx	@	inf	((* (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) (sin th)) (/ 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky))) 1 (/ (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin ky) th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (* (sin ky) 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 ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))

rewrite157.0ms (1.8%)

Memory

8.4MiB live, 334.5MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1132	9664
0	1197	7456
0	9115	7078

Stop Event

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

Counts

193 → 310

Calls

Call 1

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

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

eval79.0ms (0.9%)

Memory: 30.9MiB live, 162.1MiB allocated; 43ms collecting garbage
Compiler: Compiled 7 859 to 1 895 computations (75.9% saved)

prune86.0ms (1%)

Memory

-12.8MiB live, 126.8MiB allocated; 54ms collecting garbage

Pruning

52 alts after pruning (49 fresh and 3 done)

	Pruned	Kept	Total
New	341	40	381
Fresh	11	9	20
Picked	2	3	5
Done	0	0	0
Total	354	52	406

Accuracy

100.0%

Counts

406 → 52

Alt Table

Click to see full alt table

Status	Accuracy	Program
	98.1%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	97.7%	(/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 th) (sin.f64 ky))))
▶	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	51.4%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (+.f64 #s(literal 1 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))))))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 kx) (cos.f64 kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	77.6%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))) #s(literal 1/2 binary64)))) (sin.f64 th))
	45.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	42.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
▶	49.1%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	49.4%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) th))
	61.6%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)) #s(approx (sin ky) ky))) (sin.f64 th))
	57.4%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))) (sin.f64 ky)) (sin.f64 ky))) (sin.f64 th))
	42.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))) (sin.f64 ky))) (sin.f64 th))
	99.5%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (sin.f64 th))
	36.9%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (/.f64 (fabs.f64 (sin.f64 kx)) ky))) (sin.f64 th))
	97.9%	(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
✓	99.5%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	57.4%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))) (sin.f64 ky))))
	57.7%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	33.3%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
	42.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	49.0%	(.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	49.3%	(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	99.4%	(.f64 (sin.f64 ky) (.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	36.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
▶	52.1%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 ky ky))))))))
	48.4%	(.f64 #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (.f64 ky ky))) #s(literal -1/6 binary64)))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 ky ky))) #s(literal -1/6 binary64)))))))))
	59.3%	(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
✓	35.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	18.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))))))
	18.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 kx kx))) #s(literal -1/6 binary64)))))))))
	18.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/120 binary64) (*.f64 kx kx) #s(literal -1/6 binary64)))))))))
	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
✓	47.8%	#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))))
	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))) (sin.f64 ky))))
	32.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/120 binary64) (*.f64 kx kx) #s(literal -1/6 binary64)))))) (sin.f64 ky))))
	32.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	19.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
	18.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	15.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))) ky) (fabs.f64 (sin.f64 kx))))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (.f64 th th) (fma.f64 (.f64 th th) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 th th))) #s(literal -1/6 binary64)))))) ky) (fabs.f64 (sin.f64 kx))))
▶	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
	23.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 ky ky))))))))
	29.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin ky) ky) th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	47.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 ky) th))))
▶	35.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
	35.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
	47.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	39.5%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))

Compiler

Compiled 2 175 to 1 947 computations (10.5% saved)

series49.0ms (0.6%)

Memory

-18.2MiB live, 72.2MiB allocated; 16ms collecting garbage

Counts

37 → 101

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite210.0ms (2.4%)

Memory

17.7MiB live, 201.3MiB allocated; 43ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	697	5019
0	754	4280
1	5523	4222
0	8061	4032

Stop Event

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

Counts

138 → 543

Calls

Call 1

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

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

eval99.0ms (1.1%)

Memory: -11.9MiB live, 84.9MiB allocated; 70ms collecting garbage
Compiler: Compiled 6 585 to 2 064 computations (68.7% saved)

prune58.0ms (0.7%)

Memory

44.3MiB live, 90.7MiB allocated; 3ms collecting garbage

Pruning

73 alts after pruning (67 fresh and 6 done)

	Pruned	Kept	Total
New	416	37	453
Fresh	14	30	44
Picked	2	3	5
Done	0	3	3
Total	432	73	505

Accuracy

100.0%

Counts

505 → 73

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	98.1%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	52.0%	(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx)))
	97.7%	(/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 th) (sin.f64 ky))))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	57.5%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	57.8%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	49.1%	(.f64 (/.f64 (sin.f64 ky) (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)))
	51.4%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (+.f64 #s(literal 1 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))))))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	77.6%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 1/2 binary64)))) (sin.f64 th))
	45.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	42.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	61.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	20.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) #s(approx ( th (- 1 (* 1/6 (* th th)))) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal 1/6 binary64)) (.f64 (.f64 th th) th)))))
	49.4%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) th))
	31.0%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)) #s(approx (sin ky) ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	33.2%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	42.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))) (sin.f64 ky))) (sin.f64 th))
	49.1%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	19.4%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (sin.f64 ky)))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	16.3%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (/.f64 (fabs.f64 (sin.f64 kx)) ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 th th))))))
	97.9%	(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
✓	99.5%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	42.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	49.3%	(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	70.2%	(.f64 (exp.f64 (.f64 (log.f64 (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(literal -1 binary64))) (sin.f64 th))
	36.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	34.7%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 ky ky))))))))
▶	52.0%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))))))
	51.8%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx)) (sin.f64 th))))
	52.0%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx)))))
	36.5%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
	13.2%	(.f64 #s(approx (sin ky) (.f64 ky #s(approx (- 1 (* 1/6 (* ky ky))) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky #s(approx (- 1 ( 1/6 (* ky ky))) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))))))))
	59.3%	(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
✓	35.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	18.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))))))
	18.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 kx kx))) #s(literal -1/6 binary64)))))))))
▶	18.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/120 binary64) (*.f64 kx kx) #s(literal -1/6 binary64)))))))))
	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
✓	47.8%	#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))))
	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))) (sin.f64 ky))))
▶	32.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	19.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
	18.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	15.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))) ky) (fabs.f64 (sin.f64 kx))))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (.f64 th th) (fma.f64 (.f64 th th) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 th th))) #s(literal -1/6 binary64)))))) ky) (fabs.f64 (sin.f64 kx))))
	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
	12.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
✓	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
	11.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
	11.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))))
	11.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
▶	11.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	23.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 ky ky))))))))
	29.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin ky) ky) th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	15.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (.f64 (fma.f64 (.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 (sin.f64 kx))))
	47.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 ky) th))))
	36.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
	36.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
✓	35.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
	14.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)) ky))))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 #s(approx (sin th) th) ky))))
	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 #s(approx (sin kx) kx)) (*.f64 (sin.f64 th) ky))))
	16.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 th th) (fabs.f64 (sin.f64 kx))) ky) #s(literal 1/6 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) th))))
	35.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
	47.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
	16.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	36.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
	39.5%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))
	33.3%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))))

Compiler

Compiled 3 200 to 2 870 computations (10.3% saved)

series43.0ms (0.5%)

Memory

-34.3MiB live, 61.0MiB allocated; 9ms collecting garbage

Counts

46 → 115

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite204.0ms (2.3%)

Memory

26.2MiB live, 208.5MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	761	5729
0	824	4807
1	6067	4739
0	8053	4539

Stop Event

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

Counts

161 → 681

Calls

Call 1

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

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

eval67.0ms (0.8%)

Memory: 27.5MiB live, 115.3MiB allocated; 13ms collecting garbage
Compiler: Compiled 7 593 to 2 427 computations (68% saved)

prune91.0ms (1%)

Memory

-22.0MiB live, 126.1MiB allocated; 18ms collecting garbage

Pruning

90 alts after pruning (81 fresh and 9 done)

	Pruned	Kept	Total
New	527	28	555
Fresh	9	53	62
Picked	2	3	5
Done	0	6	6
Total	538	90	628

Accuracy

100.0%

Counts

628 → 90

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	98.1%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	55.9%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 #s(approx (sin kx) (.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/6 binary64) #s(literal 1 binary64)) kx)) (sin.f64 ky)))
	96.5%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal -1 binary64))))
	60.1%	(/.f64 (*.f64 (sin.f64 th) #s(approx (sin ky) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))
	47.6%	(/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	52.0%	(/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 th)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx)))
	97.7%	(/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 th) (sin.f64 ky))))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	57.8%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	51.4%	(.f64 (/.f64 (sin.f64 ky) (.f64 (sqrt.f64 (+.f64 #s(literal 1 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))))))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	45.7%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
	42.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	61.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	20.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) #s(approx ( th (- 1 (* 1/6 (* th th)))) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal 1/6 binary64)) (.f64 (.f64 th th) th)))))
	49.4%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) th))
	31.0%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)) #s(approx (sin ky) ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	33.2%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky)) (sin.f64 ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	42.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx))) (sin.f64 ky))) (sin.f64 th))
	49.1%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	19.4%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (sin.f64 ky)))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))))
	16.3%	(.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin ky)) (/.f64 (fabs.f64 (sin.f64 kx)) ky))) #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 th th))))))
	97.9%	(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
✓	99.5%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	42.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	49.3%	(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	70.2%	(.f64 (exp.f64 (.f64 (log.f64 (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky))) #s(literal -1 binary64))) (sin.f64 th))
	36.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
	34.7%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) kx) #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 ky ky))))))))
	36.5%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))))
	50.1%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 (sin.f64 th) (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx)))) #s(literal -1 binary64)))))
	51.8%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx)) (sin.f64 th))))
	36.5%	(.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) #s(approx (/ (sin th) (/ 1 (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
	13.2%	(.f64 #s(approx (sin ky) (.f64 ky #s(approx (- 1 (* 1/6 (* ky ky))) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky #s(approx (- 1 ( 1/6 (* ky ky))) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))))))))
	13.2%	(.f64 #s(approx (sin ky) #s(approx ( ky (- 1 (* 1/6 (* ky ky)))) (.f64 (.f64 (.f64 ky ky) ky) #s(literal -1/6 binary64)))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))))))
	59.3%	(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	33.3%	#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
✓	35.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
	18.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 kx kx))) #s(literal -1/6 binary64)))))))))
	18.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) #s(approx (+ (* 1/120 (* kx kx)) -1/6) (.f64 (.f64 kx kx) #s(literal 1/120 binary64))))))))))
	18.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx #s(approx (+ 1 (* (* kx kx) (+ (* 1/120 (* kx kx)) -1/6))) (fma.f64 (*.f64 kx kx) #s(literal -1/6 binary64) #s(literal 1 binary64))))))))
	8.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx #s(approx (+ 1 (* (* kx kx) (+ (* 1/120 (* kx kx)) -1/6))) (.f64 (.f64 (.f64 kx kx) (.f64 kx kx)) #s(literal 1/120 binary64))))))))
	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
✓	47.8%	#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))))
	32.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) (.f64 kx (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 kx kx))))) (sin.f64 ky))))
✓	32.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	25.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) (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)))))
	18.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 (sin.f64 ky) th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
	10.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 #s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/120 binary64) (*.f64 kx kx) #s(literal -1/6 binary64)))))))))
	15.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 th (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th))))) ky) (fabs.f64 (sin.f64 kx))))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) (.f64 th (+.f64 #s(literal 1 binary64) (.f64 (.f64 th th) (fma.f64 (.f64 th th) (-.f64 #s(literal 1/120 binary64) (.f64 #s(literal 1/5040 binary64) (*.f64 th th))) #s(literal -1/6 binary64)))))) ky) (fabs.f64 (sin.f64 kx))))
	12.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
	10.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (sqrt.f64 (.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
✓	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
	11.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
	11.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))))
	11.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
✓	11.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
	16.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 ky ky) #s(literal -1/6 binary64)) (.f64 ky ky) #s(literal 1 binary64)) ky)) th) (hypot.f64 #s(approx (sin kx) kx) #s(approx (sin ky) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 ky ky) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky)))))
	23.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 ky ky))))) th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 ky (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (*.f64 ky ky))))))))
	29.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin ky) ky) th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	24.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin ky) ky) th) (hypot.f64 #s(approx (sin kx) kx) #s(approx (sin ky) ky))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) ky) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
	15.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (.f64 (fma.f64 (.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 (sin.f64 kx))))
	10.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (.f64 (fma.f64 (.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
	16.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin ky) th) (.f64 (fma.f64 (.f64 (*.f64 ky ky) th) #s(literal -1/6 binary64) th) ky)) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky))))
	47.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 ky) th))))
	36.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
	36.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
✓	35.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
	14.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (.f64 #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)) ky))))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 #s(approx (sin th) th) ky))))
	18.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 #s(approx (sin kx) kx)) (*.f64 (sin.f64 th) ky))))
	11.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 #s(approx (sin kx) kx)) (*.f64 #s(approx (sin th) th) ky))))
	16.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 th th) (fabs.f64 (sin.f64 kx))) ky) #s(literal 1/6 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) th))))
	35.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (.f64 (sin.f64 th) ky)))
	18.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (.f64 kx kx) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))))))
	47.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
	32.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky)))))
	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
	11.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 #s(approx (sin kx) kx)))))
	19.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 th) (/.f64 ky (fabs.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 (.f64 kx kx) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx))))))
	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 ky) (/.f64 th (hypot.f64 #s(approx (sin kx) kx) (sin.f64 ky)))))
	16.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
	36.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
	19.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* (sin ky) th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
	39.5%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sin th)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))

Compiler

Compiled 3 604 to 2 540 computations (29.5% saved)

regimes447.0ms (5%)

Memory

2.0MiB live, 434.0MiB allocated; 164ms collecting garbage

Counts

131 → 1

Calls

Call 1

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

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

Calls

9 calls:

110.0ms	kx
48.0ms	(sin.f64 kx)
46.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)))))
45.0ms	th
41.0ms	(sin.f64 ky)

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes359.0ms (4%)

Memory

-15.2MiB live, 555.4MiB allocated; 91ms collecting garbage

Counts

116 → 1

Calls

Call 1

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

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

Calls

9 calls:

58.0ms	kx
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))
48.0ms	(sin.f64 kx)
37.0ms	(sin.f64 th)
36.0ms	ky

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes272.0ms (3.1%)

Memory

29.6MiB live, 362.1MiB allocated; 35ms collecting garbage

Counts

110 → 1

Calls

Call 1

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

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

Calls

9 calls:

39.0ms	ky
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	(sin.f64 th)
30.0ms	(sin.f64 kx)
29.0ms	(sin.f64 ky)

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes319.0ms (3.6%)

Memory

-0.3MiB live, 413.7MiB allocated; 83ms collecting garbage

Counts

109 → 5

Calls

Call 1

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

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

Calls

9 calls:

51.0ms	(sin.f64 kx)
46.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)))))
36.0ms	(sin.f64 th)
34.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
31.0ms	th

Results

Accuracy	Segments	Branch
81.9%	4	`(sin.f64 th)`
79.4%	3	`(sin.f64 kx)`
79.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
80.6%	3	`(sin.f64 ky)`
86.6%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
74.9%	5	`(*.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.4%	2	`kx`
78.9%	2	`ky`
79.8%	2	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes32.0ms (0.4%)

Memory

18.5MiB live, 63.0MiB allocated; 7ms collecting garbage

Counts

103 → 5

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes36.0ms (0.4%)

Memory

5.5MiB live, 63.7MiB allocated; 13ms collecting garbage

Counts

102 → 5

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes34.0ms (0.4%)

Memory

-37.4MiB live, 53.8MiB allocated; 10ms collecting garbage

Counts

96 → 5

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes26.0ms (0.3%)

Memory

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

Counts

95 → 5

Calls

Call 1

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

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes30.0ms (0.3%)

Memory

2.0MiB live, 47.8MiB allocated; 5ms collecting garbage

Counts

94 → 5

Calls

Call 1

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

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes30.0ms (0.3%)

Memory

-7.7MiB live, 47.1MiB allocated; 7ms collecting garbage

Counts

93 → 5

Calls

Call 1

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

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes30.0ms (0.3%)

Memory

-4.1MiB live, 41.3MiB allocated; 5ms collecting garbage

Counts

92 → 5

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes29.0ms (0.3%)

Memory

4.0MiB live, 48.7MiB allocated; 6ms collecting garbage

Counts

90 → 5

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes193.0ms (2.2%)

Memory

2.3MiB live, 192.0MiB allocated; 21ms collecting garbage

Counts

84 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

78.0ms	th
23.0ms	(sin.f64 ky)
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)))))
21.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
21.0ms	kx

Results

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

Compiler

Compiled 21 to 30 computations (-42.9% saved)

regimes138.0ms (1.6%)

Memory

-10.3MiB live, 139.5MiB allocated; 23ms collecting garbage

Counts

71 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

49.0ms	ky
28.0ms	(sin.f64 ky)
22.0ms	(sin.f64 kx)
18.0ms	(sin.f64 th)
17.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
63.2%	2	`(sin.f64 kx)`
65.0%	3	`(sin.f64 th)`
70.5%	2	`(sin.f64 ky)`
72.2%	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)))))`
65.8%	2	`ky`

Compiler

Compiled 19 to 26 computations (-36.8% saved)

regimes43.0ms (0.5%)

Memory

-9.6MiB live, 78.9MiB allocated; 7ms collecting garbage

Counts

69 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 14 to 15 computations (-7.1% saved)

regimes140.0ms (1.6%)

Memory

10.8MiB live, 205.5MiB allocated; 14ms collecting garbage

Counts

56 → 4

Calls

Call 1

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

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

Calls

9 calls:

17.0ms	(sin.f64 ky)
17.0ms	(sin.f64 kx)
16.0ms	ky
16.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
15.0ms	kx

Results

Accuracy	Segments	Branch
53.8%	4	`(sin.f64 kx)`
53.6%	3	`(sin.f64 th)`
53.5%	2	`th`
55.7%	3	`ky`
53.8%	3	`kx`
53.8%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
52.7%	5	`(*.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))`
54.8%	3	`(sin.f64 ky)`
61.4%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes48.0ms (0.5%)

Memory

-22.1MiB live, 73.5MiB allocated; 11ms collecting garbage

Counts

49 → 4

Calls

Call 1

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

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

Calls

3 calls:

18.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
15.0ms	th
13.0ms	ky

Results

Accuracy	Segments	Branch
51.5%	2	`th`
46.1%	2	`ky`
56.4%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 14 to 17 computations (-21.4% saved)

regimes81.0ms (0.9%)

Memory

29.1MiB live, 75.1MiB allocated; 3ms collecting garbage

Counts

44 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

21.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
12.0ms	(sin.f64 ky)
12.0ms	kx
11.0ms	th
11.0ms	(sin.f64 th)

Results

Accuracy	Segments	Branch
51.5%	2	`th`
51.5%	3	`(sin.f64 th)`
44.3%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
44.3%	2	`kx`
48.6%	3	`(sin.f64 ky)`
52.6%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 22 to 31 computations (-40.9% saved)

regimes119.0ms (1.3%)

Memory

-16.9MiB live, 75.1MiB allocated; 18ms collecting garbage

Counts

37 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
31.0%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
31.0%	1	`kx`
34.9%	2	`ky`
34.6%	2	`(sin.f64 ky)`
35.7%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
39.1%	3	`(sin.f64 th)`
31.0%	1	`(sin.f64 kx)`
34.2%	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)))))`
39.2%	2	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes19.0ms (0.2%)

Memory

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

Counts

32 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

9.0ms	(sin.f64 th)
8.0ms	th

Results

Accuracy	Segments	Branch
37.3%	3	`(sin.f64 th)`
37.4%	2	`th`

Compiler

Compiled 3 to 7 computations (-133.3% saved)

regimes65.0ms (0.7%)

Memory

11.3MiB live, 57.1MiB allocated; 3ms collecting garbage

Counts

24 → 2

Calls

Call 1

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

Outputs

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
28.3%	2	`kx`
27.2%	2	`(sin.f64 kx)`
28.3%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
30.2%	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)))))`
28.6%	2	`(sin.f64 ky)`
28.9%	2	`ky`
29.6%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
32.0%	3	`(sin.f64 th)`
32.0%	2	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes42.0ms (0.5%)

Memory

-30.9MiB live, 15.8MiB allocated; 2ms collecting garbage

Counts

14 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
24.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))`
28.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)))))`
24.4%	1	`(sin.f64 th)`
24.4%	1	`th`

Compiler

Compiled 30 to 31 computations (-3.3% saved)

regimes23.0ms (0.3%)

Memory

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

Counts

12 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 22 to 31 computations (-40.9% saved)

regimes38.0ms (0.4%)

Memory

-10.7MiB live, 35.5MiB allocated; 2ms collecting garbage

Accuracy

Total -1.9b remaining (-3.4%)

Threshold costs -1.9b (-3.4%)

Counts

7 → 1

Calls

Call 1

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

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9967626212367703	0.9981270308658593
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9967626212367703	0.9981270308658593
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9967626212367703	0.9981270308658593
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9967626212367703	0.9981270308658593
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9967626212367703	0.9981270308658593
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9803587283372394	0.9817842424666783
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9803587283372394	0.9817842424666783
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9803587283372394	0.9817842424666783
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9803587283372394	0.9817842424666783
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.45587324795967277	-0.4296460577180843
0.0ms	-0.9785883116343753	-0.9759590439473079

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch64.0ms (0.7%)

Memory

-38.7MiB live, 38.5MiB allocated; 66ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
62.0ms	3.6756355927096832e-19	6.698874447152793e-16

Samples

16.0ms

128×

valid

Compiler

Compiled 251 to 242 computations (3.6% saved)

Precisions

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

ival-sin: 8.0ms (61.3% of total)

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

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

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

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

adjust: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.03686138592333952	0.10986478020215625
0.0ms	-1.0	-0.9999373828756355

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.0002832095302055808	1.583423811885455e-302

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000000000032148
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.0002832095302055808	1.583423811885455e-302

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	1.0	1.0000000000032148
0.0ms	0.10986478020215625	0.1724635553462087
0.0ms	-0.3910338244915052	-0.3642144837787648

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch26.0ms (0.3%)

Memory

3.5MiB live, 48.8MiB allocated; 7ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
24.0ms	0.0008616440461841536	3.6023749329453225

Samples

19.0ms

128×

valid

Compiler

Compiled 339 to 330 computations (2.7% saved)

Precisions

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

ival-sin: 7.0ms (46.1% of total)

ival-mult!: 4.0ms (26.3% of total)

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

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

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

adjust: 0.0ms (0% of total)

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

bsearch24.0ms (0.3%)

Memory

-3.3MiB live, 42.6MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	7.767753963305624	339.78739653863164

Samples

18.0ms

112×

valid

Compiler

Compiled 306 to 291 computations (4.9% saved)

Precisions

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

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

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

ival-mult!: 2.0ms (13.3% of total)

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

adjust: 0.0ms (0% of total)

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

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

bsearch22.0ms (0.2%)

Memory

-5.1MiB live, 40.7MiB allocated; 6ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
20.0ms	45935960.44118666	190732240.78449357

Samples

17.0ms

96×

valid

Compiler

Compiled 283 to 258 computations (8.8% saved)

Precisions

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

ival-sin: 8.0ms (56.8% of total)

ival-add!: 3.0ms (21.3% of total)

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

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

adjust: 0.0ms (0% of total)

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

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

bsearch31.0ms (0.3%)

Memory

13.8MiB live, 65.8MiB allocated; 10ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
29.0ms	2596.0868009693636	45935960.44118666

Samples

24.0ms

128×

valid

Compiler

Compiled 379 to 338 computations (10.8% saved)

Precisions

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

ival-sin: 16.0ms (78.6% of total)

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

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

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

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

adjust: 0.0ms (0% of total)

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

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.5932307014521677e-33	1.5531123583267712e-22

Compiler

Compiled 18 to 19 computations (-5.6% saved)

derivations912.0ms (10.3%)

Memory

1.3MiB live, 1 029.7MiB allocated; 180ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 430 to 218 computations (49.3% saved)

preprocess873.0ms (9.8%)

Memory

33.6MiB live, 1 204.7MiB allocated; 246ms collecting garbage

Remove

(negabs th)

(negabs ky)

(abs kx)

Compiler

Compiled 11 889 to 8 409 computations (29.3% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze956.0ms (10.8%)

sample1.8s (19.8%)

preprocess57.0ms (0.6%)

series50.0ms (0.6%)

rewrite201.0ms (2.3%)

eval31.0ms (0.3%)

prune23.0ms (0.3%)

series97.0ms (1.1%)

rewrite157.0ms (1.8%)

eval79.0ms (0.9%)

prune86.0ms (1%)

series49.0ms (0.6%)

rewrite210.0ms (2.4%)

eval99.0ms (1.1%)

prune58.0ms (0.7%)

series43.0ms (0.5%)

rewrite204.0ms (2.3%)

eval67.0ms (0.8%)

prune91.0ms (1%)

regimes447.0ms (5%)

regimes359.0ms (4%)

regimes272.0ms (3.1%)

regimes319.0ms (3.6%)

regimes32.0ms (0.4%)

regimes36.0ms (0.4%)

regimes34.0ms (0.4%)

regimes26.0ms (0.3%)

regimes30.0ms (0.3%)

regimes30.0ms (0.3%)

regimes30.0ms (0.3%)

regimes29.0ms (0.3%)

regimes193.0ms (2.2%)

regimes138.0ms (1.6%)

regimes43.0ms (0.5%)

regimes140.0ms (1.6%)

regimes48.0ms (0.5%)

regimes81.0ms (0.9%)

regimes119.0ms (1.3%)

regimes19.0ms (0.2%)

regimes65.0ms (0.7%)

regimes42.0ms (0.5%)

regimes23.0ms (0.3%)

regimes38.0ms (0.4%)

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

bsearch64.0ms (0.7%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch26.0ms (0.3%)

bsearch24.0ms (0.3%)

bsearch22.0ms (0.2%)

bsearch31.0ms (0.3%)

bsearch0.0ms (0%)

derivations912.0ms (10.3%)

preprocess873.0ms (9.8%)

end0.0ms (0%)

Profiling