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

start0.0ms (0%)

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

analyze629.0ms (9.5%)

Memory

-187.7MiB live, 248.3MiB allocated; 825ms 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.5s (22.1%)

Memory

68.6MiB live, 2 030.1MiB allocated; 219ms collecting garbage

Samples

1.2s	8 255×	0	valid
1.0ms	1×	1	valid

Precisions

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

ival-sin: 605.0ms (65.4% of total)

ival-pow2: 156.0ms (16.9% of total)

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

ival-div!: 43.0ms (4.6% of total)

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

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

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess37.0ms (0.6%)

Memory

-8.7MiB live, 37.7MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	46	166
1	92	163
2	224	163
3	435	163
4	959	163
5	3019	163

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 30 to 26 computations (13.3% saved)

series38.0ms (0.6%)

Memory

13.8MiB live, 64.8MiB allocated; 8ms collecting garbage

Counts

13 → 68

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite281.0ms (4.3%)

Memory

0.7MiB live, 371.4MiB allocated; 100ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	432	2436
0	448	2305
1	2695	2273
0	11452	1933

Stop Event

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

Counts

81 → 164

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

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

eval27.0ms (0.4%)

Memory: 0.7MiB live, 44.6MiB allocated; 14ms collecting garbage
Compiler: Compiled 2 318 to 915 computations (60.5% saved)

prune18.0ms (0.3%)

Memory

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

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	139	24	163
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	140	24	164

Accuracy

99.9%

Counts

164 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	97.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	71.3%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))) (sin.f64 th))
	41.1%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	86.5%	(.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))
	78.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	50.6%	(*.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))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.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) ky))))))) (sin.f64 th))
▶	65.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
	43.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	78.7%	(.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))
	53.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	32.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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)))))))) (sin.f64 th))
	35.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
	45.4%	(.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))
▶	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	31.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) kx))))))) (sin.f64 th))
	31.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	17.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (/.f64 (.f64 kx 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) #s(literal 1 binary64))) (sin.f64 th))
	28.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	27.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	22.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
	51.1%	#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)))))
▶	30.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 934 to 886 computations (5.1% saved)

series102.0ms (1.5%)

Memory

-19.9MiB live, 166.9MiB allocated; 47ms collecting garbage

Counts

41 → 196

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

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

Calls

9 calls:

Time	Variable		Point	Expression
50.0ms	ky	@	inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 1 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (pow (sin kx) 2) (exp (* (log (sin ky)) 2)) (* (log (sin ky)) 2) (log (sin ky)))
20.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 1 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (pow (sin kx) 2) (exp (* (log (sin ky)) 2)) (* (log (sin ky)) 2) (log (sin ky)))
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 ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 1 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (pow (sin kx) 2) (exp (* (log (sin ky)) 2)) (* (log (sin ky)) 2) (log (sin ky)))
4.0ms	ky	@	0	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 1 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (pow (sin kx) 2) (exp (* (log (sin ky)) 2)) (* (log (sin ky)) 2) (log (sin ky)))
3.0ms	kx	@	-inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 1 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (pow (sin kx) 2) (exp (* (log (sin ky)) 2)) (* (log (sin ky)) 2) (log (sin ky)))

rewrite210.0ms (3.2%)

Memory

23.3MiB live, 208.2MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	713	7618
0	774	6439
1	3834	6415
0	8109	6082

Stop Event

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

Counts

237 → 635

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

eval69.0ms (1%)

Memory: 10.2MiB live, 98.1MiB allocated; 12ms collecting garbage
Compiler: Compiled 6 577 to 2 659 computations (59.6% saved)

prune101.0ms (1.5%)

Memory

-83.6MiB live, 77.4MiB allocated; 88ms collecting garbage

Pruning

44 alts after pruning (41 fresh and 3 done)

	Pruned	Kept	Total
New	470	34	504
Fresh	12	7	19
Picked	2	3	5
Done	0	0	0
Total	484	44	528

Accuracy

99.9%

Counts

528 → 44

Alt Table

Click to see full alt table

Status	Accuracy	Program
	97.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	25.2%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	34.0%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
	34.1%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
▶	99.5%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
▶	53.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	58.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	48.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	41.1%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	26.9%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	78.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))) (sin.f64 th))
	65.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
▶	50.6%	(*.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))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.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) ky))))))) (sin.f64 th))
✓	65.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
	78.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	17.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 (sin th) th))
	28.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))) (sin.f64 th))
▶	23.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	12.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	12.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	18.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))))))) #s(approx (sin th) th))
	4.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	2.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	31.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ ( (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	6.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ ( (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 ky ky)) #s(literal 1/3 binary64)) (.f64 (.f64 ky ky) (*.f64 ky ky))))))) (sin.f64 th))
	12.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (exp ( (log (sin ky)) 2)) (*.f64 ky ky))))) (sin.f64 th))
	45.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	31.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	32.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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)))))))) (sin.f64 th))
	3.2%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	28.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	17.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (/.f64 (.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 th))
	27.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	51.1%	#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)))))
✓	30.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	15.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
▶	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Compiler

Compiled 1 898 to 1 765 computations (7% saved)

series32.0ms (0.5%)

Memory

24.3MiB live, 68.5MiB allocated; 4ms collecting garbage

Counts

34 → 161

Calls

Call 1

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

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#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 (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow kx 2))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (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 (+ (* (+ (* (* ky ky) -1/3) 1) (* ky 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 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (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 (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (/ 1 (/ 1 (sin ky))) #s(hole binary64 ky))
#s(approx (/ 1 (/ 1 (sin ky))) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (/ 1 (/ 1 (sin ky))) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (/ 1 (/ 1 (sin ky))) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ 1 ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (* (* ky ky) -1/3) 1) #s(hole binary64 1))
#s(approx (+ (* (* ky ky) -1/3) 1) #s(hole binary64 (+ 1 (* -1/3 (pow ky 2)))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#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 (/ 1 (/ 1 (sin ky))) #s(hole binary64 (sin ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* -1/3 (pow ky 4))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 4) (- (/ 1 (pow ky 2)) 1/3))))
#s(approx (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 4) (- (+ (/ 1/2 (pow ky 4)) (/ 1 (pow ky 2))) (+ 1/3 (* 1/2 (/ (cos (* 2 kx)) (pow ky 4))))))))
#s(approx (+ (* (* ky ky) -1/3) 1) #s(hole binary64 (* -1/3 (pow ky 2))))
#s(approx (+ (* (* ky ky) -1/3) 1) #s(hole binary64 (* (pow ky 2) (- (/ 1 (pow ky 2)) 1/3))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx th #s(hole binary64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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	ky	@	0	((* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* kx kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) 2 (pow (sin ky) 2))
4.0ms	ky	@	inf	((* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* kx kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) 2 (pow (sin ky) 2))
4.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* kx kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) 2 (pow (sin ky) 2))
3.0ms	kx	@	inf	((* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* kx kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) 2 (pow (sin ky) 2))
3.0ms	kx	@	-inf	((* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) (- 1/2 (* 1/2 (cos (* 2 kx))))) (+ (* (* ky ky) -1/3) 1) (* ky ky) -1/3 (- 1/2 (* 1/2 (cos (* 2 kx)))) (* kx kx) (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) 2 (pow (sin ky) 2))

rewrite213.0ms (3.2%)

Memory

0.6MiB live, 232.1MiB allocated; 28ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	603	6846
0	664	5813
1	3364	5789
0	8125	5468

Stop Event

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

Counts

195 → 687

Calls

Call 1

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

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

eval74.0ms (1.1%)

Memory: 9.5MiB live, 106.6MiB allocated; 16ms collecting garbage
Compiler: Compiled 6 119 to 2 422 computations (60.4% saved)

prune50.0ms (0.8%)

Memory

-6.2MiB live, 82.9MiB allocated; 9ms collecting garbage

Pruning

52 alts after pruning (46 fresh and 6 done)

	Pruned	Kept	Total
New	484	16	500
Fresh	6	30	36
Picked	2	3	5
Done	0	3	3
Total	492	52	544

Accuracy

100.0%

Counts

544 → 52

Alt Table

Click to see full alt table

Status	Accuracy	Program
	97.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	23.0%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx))))))
▶	25.2%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
▶	34.0%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
	51.2%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	99.6%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
✓	99.5%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	53.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	33.4%	(.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)))) #s(approx (sin th) th))
	58.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	33.5%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) #s(approx (sin th) th))
	25.6%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))) #s(approx (sin th) th))
▶	25.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (sin.f64 kx))) #s(approx (sin th) th))
	48.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	41.1%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	26.9%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (sin.f64 th))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	65.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
	46.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.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) ky))))))) (sin.f64 th))
✓	65.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
	31.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	47.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	47.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	43.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	28.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))) (sin.f64 th))
	14.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)))))) #s(approx (sin th) (.f64 (fma.f64 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
	14.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	31.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	12.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	12.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	18.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))))))) #s(approx (sin th) th))
	4.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	2.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
	12.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (exp ( (log (sin ky)) 2)) (*.f64 ky ky))))) (sin.f64 th))
	31.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	23.6%	(.f64 (/.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (sqrt.f64 #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) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
	32.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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)))))))) (sin.f64 th))
	3.2%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	28.7%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	17.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (/.f64 (.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 th))
	27.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	51.1%	#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)))))
✓	30.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
▶	15.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Compiler

Compiled 2 045 to 1 948 computations (4.7% saved)

series40.0ms (0.6%)

Memory

-5.2MiB live, 49.4MiB allocated; 8ms collecting garbage

Counts

43 → 198

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
9.0ms	ky	@	0	((* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (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) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* th th) -1/6 (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) (sin th) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* (cos (+ kx kx)) 1/2)) (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* ky ky) (+ (* (* ky ky) -1/3) 1) -1/3 (* (cos (+ kx kx)) 1/2) (cos (+ kx kx)) (+ kx kx))
4.0ms	ky	@	-inf	((* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (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) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* th th) -1/6 (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) (sin th) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* (cos (+ kx kx)) 1/2)) (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* ky ky) (+ (* (* ky ky) -1/3) 1) -1/3 (* (cos (+ kx kx)) 1/2) (cos (+ kx kx)) (+ kx kx))
4.0ms	ky	@	inf	((* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (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) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* th th) -1/6 (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) (sin th) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* (cos (+ kx kx)) 1/2)) (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* ky ky) (+ (* (* ky ky) -1/3) 1) -1/3 (* (cos (+ kx kx)) 1/2) (cos (+ kx kx)) (+ kx kx))
4.0ms	kx	@	-inf	((* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (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) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* th th) -1/6 (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) (sin th) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* (cos (+ kx kx)) 1/2)) (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* ky ky) (+ (* (* ky ky) -1/3) 1) -1/3 (* (cos (+ kx kx)) 1/2) (cos (+ kx kx)) (+ kx kx))
3.0ms	kx	@	inf	((* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (/ 1 (/ 1 (sin ky))) 1 (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (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) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* th th) -1/6 (* (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (sqrt (+ (* (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (/ 1 (/ 1 (sin ky))) (sin th) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky) (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))))) (sqrt (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2)))) (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (- (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* (cos (+ kx kx)) 1/2)) (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) (* ky ky) (+ (* (* ky ky) -1/3) 1) -1/3 (* (cos (+ kx kx)) 1/2) (cos (+ kx kx)) (+ kx kx))

rewrite244.0ms (3.7%)

Memory

12.7MiB live, 201.8MiB allocated; 44ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	766	7920
0	824	6580
1	4322	6556
0	8049	6214

Stop Event

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

Counts

241 → 626

Calls

Call 1

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

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

eval78.0ms (1.2%)

Memory: -27.9MiB live, 154.4MiB allocated; 38ms collecting garbage
Compiler: Compiled 6 878 to 2 803 computations (59.2% saved)

prune66.0ms (1%)

Memory

7.3MiB live, 148.2MiB allocated; 7ms collecting garbage

Pruning

65 alts after pruning (56 fresh and 9 done)

	Pruned	Kept	Total
New	556	28	584
Fresh	13	28	41
Picked	2	3	5
Done	0	6	6
Total	571	65	636

Accuracy

100.0%

Counts

636 → 65

Alt Table

Click to see full alt table

Status	Accuracy	Program
	2.5%	(/.f64 (/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp (* (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
	97.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	26.9%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))))
	43.7%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -2 binary64)))))
	34.0%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
	31.4%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(approx (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) 1/2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	12.6%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
	12.7%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
✓	34.0%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
	78.6%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
	13.7%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) #s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (*.f64 ky ky)))))
	51.2%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	24.1%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (sin.f64 kx)))
	25.0%	(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 th) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
	3.1%	(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 th) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
	18.3%	(/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (exp ( (log (sin ky)) 2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
✓	99.6%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	30.0%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ ( (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (sin.f64 ky))) (sin.f64 th))
	31.3%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ ( (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
✓	99.5%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
✓	53.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	33.4%	(.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)))) #s(approx (sin th) th))
	58.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	33.5%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) #s(approx (sin th) th))
	25.6%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))) #s(approx (sin th) th))
✓	25.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (sin.f64 kx))) #s(approx (sin th) th))
	19.9%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) #s(approx (sin kx) (.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/6 binary64) #s(literal 1 binary64)) kx)))) #s(approx (sin th) th))
	20.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) #s(approx (sin kx) kx))) #s(approx (sin th) th))
	48.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	41.1%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	46.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	86.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.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) ky))))))) (sin.f64 th))
✓	65.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))) (sin.f64 th))
	31.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin kx) kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	47.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	43.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	28.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) (exp.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))))) (sin.f64 th))
	14.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	31.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	12.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (sin.f64 th))
	18.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))))))) #s(approx (sin th) th))
	4.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) #s(approx ( 1/2 (cos (* 2 ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	19.6%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (fma.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) #s(approx (/ 1 (/ 1 (sin ky))) ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) #s(approx (sin th) th))
	31.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	23.6%	(.f64 (/.f64 #s(approx (/ 1 (/ 1 (sin ky))) ky) (sqrt.f64 #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) #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
	32.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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)))))))) (sin.f64 th))
	99.4%	(.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (sin.f64 th))
	17.1%	(.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ ( (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (fma.f64 (/.f64 (.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 th))
	28.7%	(.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ ( (/ 1 (/ 1 (sin ky))) (/ 1 (/ 1 (sin ky)))) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	27.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	51.1%	#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)))))
✓	30.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	15.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th #s(literal 1 binary64) (.f64 th (.f64 (*.f64 th th) #s(literal -1/6 binary64))))))
	15.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (*.f64 (fma.f64 (pow.f64 (exp.f64 (log.f64 th)) #s(literal 2 binary64)) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	15.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (exp.f64 (.f64 (log.f64 th) #s(literal 2 binary64))) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	15.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
	9.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th))) th)))
	9.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
	9.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (.f64 (.f64 (*.f64 th th) th) #s(literal -1/6 binary64)))))
✓	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Compiler

Compiled 2 577 to 1 847 computations (28.3% saved)

regimes300.0ms (4.5%)

Memory

15.3MiB live, 385.8MiB allocated; 35ms collecting garbage

Counts

103 → 1

Calls

Call 1

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

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

Calls

9 calls:

78.0ms	kx
29.0ms	(sin.f64 ky)
29.0ms	th
28.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
27.0ms	(sin.f64 th)

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes199.0ms (3%)

Memory

14.1MiB live, 309.7MiB allocated; 31ms collecting garbage

Counts

82 → 5

Calls

Call 1

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
80.6%	4	`(sin.f64 th)`
80.7%	3	`(sin.f64 kx)`
79.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
83.3%	5	`(sin.f64 ky)`
89.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)))))`
73.7%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
82.4%	3	`kx`
78.6%	2	`ky`
80.3%	3	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes22.0ms (0.3%)

Memory

-7.3MiB live, 37.6MiB allocated; 4ms collecting garbage

Counts

72 → 5

Calls

Call 1

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

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

Calls

1 calls:

19.0ms

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

Results

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

regimes21.0ms (0.3%)

Memory

-11.1MiB live, 34.8MiB allocated; 2ms collecting garbage

Counts

70 → 5

Calls

Call 1

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

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

Calls

1 calls:

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

regimes16.0ms (0.2%)

Memory

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

Counts

54 → 6

Calls

Call 1

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

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

Calls

1 calls:

13.0ms

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

Results

Accuracy	Segments	Branch
89.1%	6	`(/.f64 (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)

regimes117.0ms (1.8%)

Memory

-45.4MiB live, 200.7MiB allocated; 12ms collecting garbage

Counts

53 → 5

Calls

Call 1

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

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

Calls

8 calls:

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

Results

Accuracy	Segments	Branch
69.7%	4	`(sin.f64 th)`
75.1%	6	`(sin.f64 ky)`
70.3%	3	`ky`
71.7%	5	`th`
65.0%	4	`(sin.f64 kx)`
63.3%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
65.8%	4	`kx`
79.0%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 25 to 38 computations (-52% saved)

regimes67.0ms (1%)

Memory

24.0MiB live, 69.6MiB allocated; 3ms collecting garbage

Counts

52 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

4 calls:

25.0ms	(sin.f64 ky)
13.0ms	ky
13.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))
12.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
70.3%	3	`ky`
70.4%	4	`(sin.f64 ky)`
50.5%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
68.7%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 30 to 31 computations (-3.3% saved)

regimes107.0ms (1.6%)

Memory

-23.0MiB live, 121.9MiB allocated; 12ms collecting garbage

Counts

47 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

26.0ms	(sin.f64 ky)
13.0ms	(sin.f64 th)
12.0ms	th
12.0ms	ky
12.0ms	kx

Results

Accuracy	Segments	Branch
58.1%	3	`(sin.f64 kx)`
58.1%	3	`kx`
52.6%	5	`(sin.f64 th)`
51.5%	4	`th`
63.4%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
63.8%	4	`(sin.f64 ky)`
55.3%	3	`ky`

Compiler

Compiled 21 to 32 computations (-52.4% saved)

regimes38.0ms (0.6%)

Memory

26.9MiB live, 72.7MiB allocated; 2ms collecting garbage

Counts

45 → 4

Calls

Call 1

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
63.8%	4	`(sin.f64 ky)`
52.5%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
61.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)))))`

Compiler

Compiled 18 to 21 computations (-16.7% saved)

regimes24.0ms (0.4%)

Memory

4.1MiB live, 50.2MiB allocated; 4ms collecting garbage

Counts

38 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 14 to 15 computations (-7.1% saved)

regimes12.0ms (0.2%)

Memory

-9.5MiB live, 37.3MiB allocated; 2ms collecting garbage

Counts

37 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

10.0ms

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

Results

Accuracy	Segments	Branch
60.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 12 to 11 computations (8.3% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

24 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

6.0ms

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

Results

Accuracy	Segments	Branch
60.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 12 to 11 computations (8.3% saved)

regimes34.0ms (0.5%)

Memory

3.2MiB live, 51.8MiB allocated; 5ms collecting garbage

Counts

21 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 18 to 25 computations (-38.9% saved)

regimes5.0ms (0.1%)

Memory

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

Counts

15 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

4.0ms

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

Results

Accuracy	Segments	Branch
51.8%	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 12 to 11 computations (8.3% saved)

regimes42.0ms (0.6%)

Memory

-26.4MiB live, 67.0MiB allocated; 6ms collecting garbage

Counts

14 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
36.2%	3	`(sin.f64 kx)`
35.4%	2	`kx`
40.6%	2	`(sin.f64 ky)`
41.2%	2	`ky`
35.3%	3	`(sin.f64 th)`
34.6%	2	`th`
37.8%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
35.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
42.7%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes11.0ms (0.2%)

Memory

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

Counts

11 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
38.0%	2	`(sin.f64 ky)`
37.3%	2	`ky`
39.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 15 to 18 computations (-20% saved)

regimes15.0ms (0.2%)

Memory

-21.2MiB live, 25.7MiB allocated; 2ms collecting garbage

Counts

10 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 30 to 31 computations (-3.3% saved)

regimes27.0ms (0.4%)

Memory

-1.9MiB live, 48.1MiB allocated; 5ms collecting garbage

Counts

8 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
19.9%	2	`ky`
20.2%	2	`(sin.f64 ky)`
16.1%	1	`(sin.f64 th)`
16.1%	1	`th`
20.7%	3	`(sin.f64 kx)`
23.1%	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))`
20.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
20.6%	2	`kx`
22.3%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes8.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 37 to 44 computations (-18.9% 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.9999988966662059	1.0
0.0ms	3.580754547620359e-18	2.946870584146024e-15
0.0ms	-0.0661941761377853	5.222031075219636e-301
0.0ms	-0.9999999999960157	-0.9999999966316466

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.9999988966662059	1.0
0.0ms	3.580754547620359e-18	2.946870584146024e-15
0.0ms	-0.0661941761377853	5.222031075219636e-301
0.0ms	-0.9999999966316466	-0.9974026827365389

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9999988966662059	1.0
0.0ms	3.580754547620359e-18	2.946870584146024e-15
0.0ms	-0.0661941761377853	5.222031075219636e-301
0.0ms	-0.9999999999999298	-0.9999999999960157

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

5×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf
0.0ms	0.9999988966662059	1.0
0.0ms	3.580754547620359e-18	2.946870584146024e-15
0.0ms	-0.0661941761377853	5.222031075219636e-301
0.0ms	-0.9999999999999298	-0.9999999999960157

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.9999988966662059	1.0
0.0ms	3.580754547620359e-18	2.946870584146024e-15
0.0ms	-0.0661941761377853	5.222031075219636e-301
0.0ms	-0.9999999999999298	-0.9999999999960157

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch53.0ms (0.8%)

Memory

-16.0MiB live, 77.3MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
24.0ms	0.0023168245124337997	262.7567805091149
25.0ms	4.6882988672409047e-166	1.7418484239583662e-153

Samples

35.0ms

304×

valid

Compiler

Compiled 901 to 890 computations (1.2% saved)

Precisions

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

ival-sin: 17.0ms (62.6% of total)

ival-pow2: 5.0ms (18.4% of total)

ival-sqrt: 2.0ms (7.4% of total)

ival-add!: 1.0ms (3.7% of total)

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

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

adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6961872492791018	0.7109665997648783
0.0ms	-0.9999999966316466	-0.9974026827365389

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	2.5688269789576712e-18	1.5786873091089933e-13
0.0ms	4.6882988672409047e-166	1.7418484239583662e-153
0.0ms	-0.007338386977790113	1.0146401797325833e-303

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.002543021896856238	0.02738313079363991
0.0ms	-0.0661941761377853	5.222031075219636e-301

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.946870584146024e-15	0.002543021896856238
0.0ms	-0.0661941761377853	5.222031075219636e-301

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.946870584146024e-15	0.002543021896856238
0.0ms	-0.0661941761377853	5.222031075219636e-301

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.946870584146024e-15	0.002543021896856238

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.946870584146024e-15	0.002543021896856238

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.14839525260067918	0.16549101588661919

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.14839525260067918	0.16549101588661919

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch12.0ms (0.2%)

Memory

13.7MiB live, 13.6MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
11.0ms	6.306466875921336e-55	3.966187733643591e-50

Samples

6.0ms

128×

valid

Compiler

Compiled 370 to 363 computations (1.9% saved)

Precisions

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

ival-sin: 3.0ms (94.6% of total)

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

adjust: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.422263954556e-312	5.915828895084357e-308

Compiler

Compiled 18 to 19 computations (-5.6% saved)

derivations818.0ms (12.4%)

Memory

5.0MiB live, 671.2MiB allocated; 145ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 392 to 223 computations (43.1% saved)

preprocess870.0ms (13.2%)

Memory

25.8MiB live, 1 334.8MiB allocated; 232ms collecting garbage

Remove

(negabs th)

(abs kx)

Compiler

Compiled 9 251 to 7 092 computations (23.3% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze629.0ms (9.5%)

sample1.5s (22.1%)

preprocess37.0ms (0.6%)

series38.0ms (0.6%)

rewrite281.0ms (4.3%)

eval27.0ms (0.4%)

prune18.0ms (0.3%)

series102.0ms (1.5%)

rewrite210.0ms (3.2%)

eval69.0ms (1%)

prune101.0ms (1.5%)

series32.0ms (0.5%)

rewrite213.0ms (3.2%)

eval74.0ms (1.1%)

prune50.0ms (0.8%)

series40.0ms (0.6%)

rewrite244.0ms (3.7%)

eval78.0ms (1.2%)

prune66.0ms (1%)

regimes300.0ms (4.5%)

regimes199.0ms (3%)

regimes22.0ms (0.3%)

regimes21.0ms (0.3%)

regimes16.0ms (0.2%)

regimes117.0ms (1.8%)

regimes67.0ms (1%)

regimes107.0ms (1.6%)

regimes38.0ms (0.6%)

regimes24.0ms (0.4%)

regimes12.0ms (0.2%)

regimes8.0ms (0.1%)

regimes34.0ms (0.5%)

regimes5.0ms (0.1%)

regimes42.0ms (0.6%)

regimes11.0ms (0.2%)

regimes15.0ms (0.2%)

regimes27.0ms (0.4%)

regimes8.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch53.0ms (0.8%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch12.0ms (0.2%)

bsearch0.0ms (0%)

derivations818.0ms (12.4%)

preprocess870.0ms (13.2%)

end0.0ms (0%)

Profiling