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

start0.0ms (0%)

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

analyze326.0ms (3.9%)

Memory

16.0MiB live, 438.4MiB allocated; 221ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.9%	0.1%	0%	0%	0%	0
0%	0%	99.9%	0.1%	0%	0%	0%	1
0%	0%	99.9%	0.1%	0%	0%	0%	2
0%	0%	99.9%	0.1%	0%	0%	0%	3
0%	0%	99.9%	0.1%	0%	0%	0%	4
25%	25%	74.9%	0.1%	0%	0%	0%	5
43.8%	43.7%	56.2%	0.1%	0%	0%	0%	6
43.8%	43.7%	56.2%	0.1%	0%	0%	0%	7
53.1%	53%	46.8%	0.1%	0%	0%	0%	8
60.9%	60.8%	39%	0.1%	0%	0%	0%	9
60.9%	60.8%	39%	0.1%	0%	0%	0%	10
64.8%	64.7%	35.1%	0.1%	0%	0%	0%	11
68.4%	68.3%	31.6%	0.1%	0%	0%	0%	12

Compiler

Compiled 18 to 14 computations (22.2% saved)

sample1.8s (21.2%)

Memory

50.1MiB live, 2 786.9MiB allocated; 421ms collecting garbage

Samples

1.5s

8 256×

valid

Precisions

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

ival-sin: 740.0ms (66.2% of total)

ival-pow2: 198.0ms (17.7% of total)

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

ival-mult!: 54.0ms (4.8% of total)

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

ival-add!: 20.0ms (1.8% of total)

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess61.0ms (0.7%)

Memory

-31.1MiB live, 58.3MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

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

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 30 to 26 computations (13.3% saved)

series107.0ms (1.3%)

Memory

-12.2MiB live, 68.8MiB allocated; 116ms collecting garbage

Counts

13 → 60

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 (* (/ (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 (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 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) (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))))))

Calls

9 calls:

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

rewrite228.0ms (2.7%)

Memory

-17.7MiB live, 310.4MiB allocated; 40ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	424	2381
0	440	2250
1	2689	2218
0	10332	1883

Stop Event

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

Counts

73 → 155

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 (* (/ (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 (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 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) (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))))))

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 (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 #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 (.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))))) (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)))))) #s(literal -1/2 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 (* (/ (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 (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)) (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) (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))

eval19.0ms (0.2%)

Memory: 28.9MiB live, 28.9MiB allocated; 0ms collecting garbage
Compiler: Compiled 2 210 to 855 computations (61.3% saved)

prune43.0ms (0.5%)

Memory

-26.7MiB live, 31.6MiB allocated; 5ms collecting garbage

Pruning

25 alts after pruning (25 fresh and 0 done)

	Pruned	Kept	Total
New	121	25	146
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	122	25	147

Accuracy

99.9%

Counts

147 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	95.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))
	74.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))) (sin.f64 th))
	86.8%	(.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))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
▶	48.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	40.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #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))
	76.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))
▶	86.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) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	53.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #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))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (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))
	43.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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)))))))) (sin.f64 th))
	34.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
	39.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
▶	43.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))
	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) ky))))))) (sin.f64 th))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) 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)))) (sin.f64 th))
	53.1%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
	14.9%	(.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))
	29.5%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	26.7%	#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.8%	#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))
	95.6%	#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))))
	46.7%	#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.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 1 022 to 946 computations (7.4% saved)

series54.0ms (0.6%)

Memory

31.8MiB live, 78.2MiB allocated; 3ms collecting garbage

Counts

36 → 109

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

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

Calls

9 calls:

Time	Variable		Point	Expression
15.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)) (+ (* kx kx) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 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)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
8.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)) (+ (* kx kx) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 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)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
5.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)) (+ (* kx kx) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 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)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
5.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)) (+ (* kx kx) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 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)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))
5.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin ky) ky (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) kx (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (/ (sin 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)) (+ (* kx kx) (- 1/2 (* 1/2 (cos (* 2 ky))))) (- 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)) (pow (sin kx) 2) (pow (sin ky) 2) (sin th) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx))

rewrite187.0ms (2.2%)

Memory

-0.4MiB live, 275.5MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	732	4974
0	791	3988
1	4767	3846
0	8318	3651

Stop Event

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

Counts

145 → 472

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

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

eval56.0ms (0.7%)

Memory: -12.8MiB live, 87.6MiB allocated; 30ms collecting garbage
Compiler: Compiled 4 814 to 1 835 computations (61.9% saved)

prune52.0ms (0.6%)

Memory

4.1MiB live, 51.2MiB allocated; 3ms collecting garbage

Pruning

45 alts after pruning (43 fresh and 2 done)

	Pruned	Kept	Total
New	289	35	324
Fresh	12	8	20
Picked	3	2	5
Done	0	0	0
Total	304	45	349

Accuracy

100.0%

Counts

349 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	46.8%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	74.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64))))) (sin.f64 th))
	24.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	50.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #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)))
	50.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 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)))
	50.3%	(.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)))
	74.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))) (sin.f64 th))
	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) (.f64 kx kx)) #s(literal 1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	57.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	50.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(approx (sin th) th))
▶	43.6%	(.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)))))) #s(approx (sin th) th))
	86.8%	(.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))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	38.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) #s(approx (sin th) th))
	86.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #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 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	30.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	30.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))) (sin.f64 th))
	32.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
	56.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	24.6%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) #s(approx (sin th) th))
	19.9%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (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))
	64.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	27.3%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	44.5%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
	29.5%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	14.9%	(.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))
	29.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) ky)) (sin.f64 th))
	76.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
	26.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	20.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))) (.f64 ky ky) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (sin.f64 th))) ky))
	22.8%	#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))
	95.6%	#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))))
	26.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (.f64 (sin.f64 th) ky)))
▶	46.7%	#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)))))
	38.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
✓	30.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin 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)))
▶	15.3%	#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)))

Compiler

Compiled 1 762 to 1 580 computations (10.3% saved)

series96.0ms (1.1%)

Memory

13.7MiB live, 59.9MiB allocated; 2ms collecting garbage

Counts

41 → 128

Calls

Call 1

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

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

rewrite257.0ms (3%)

Memory

-2.4MiB live, 233.1MiB allocated; 29ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	882	6159
0	947	4756
1	5821	4634
0	8313	4389

Stop Event

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

Counts

169 → 467

Calls

Call 1

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

eval64.0ms (0.8%)

Memory: 2.3MiB live, 47.5MiB allocated; 4ms collecting garbage
Compiler: Compiled 5 308 to 1 899 computations (64.2% saved)

prune84.0ms (1%)

Memory

-24.7MiB live, 66.4MiB allocated; 6ms collecting garbage

Pruning

62 alts after pruning (56 fresh and 6 done)

	Pruned	Kept	Total
New	294	30	324
Fresh	12	26	38
Picked	1	4	5
Done	0	2	2
Total	307	62	369

Accuracy

100.0%

Counts

369 → 62

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	46.8%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	88.9%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (sin.f64 th))
	74.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64))))) (sin.f64 th))
	24.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	50.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #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)))
	50.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 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)))
	50.3%	(.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)))
	74.0%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))) (sin.f64 th))
▶	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (/ 1 (/ 1 (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)))) (sin.f64 th))
	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (/ 1 (/ 1 (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)))) (sin.f64 th))
	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (/ 1 (/ 1 (sin kx))) (.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/6 binary64) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	57.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (/ 1 (/ 1 (sin kx))) kx))) (sin.f64 th))
	50.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(approx (sin th) th))
✓	43.6%	(.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)))))) #s(approx (sin th) th))
	38.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	38.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) #s(approx (sin th) th))
	86.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #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 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
✓	30.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	20.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
	20.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	30.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	16.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	15.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))) (sin.f64 th))
	19.4%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (/ 1 (/ 1 (sin kx))) (/ 1 (/ 1 (sin kx)))))) (sin.f64 kx))) #s(approx (sin th) th))
▶	32.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
	56.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	19.7%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) #s(approx (sin th) th))
	64.5%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	64.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	22.7%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	22.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	29.5%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	17.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (/ 1 (/ 1 (sin kx))) (/ 1 (/ 1 (sin kx))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) ky)) #s(approx (sin th) th))
	29.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) ky)) (sin.f64 th))
	76.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
	26.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	20.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))) (.f64 ky ky) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (sin.f64 th))) ky))
	22.8%	#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))
	95.6%	#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))))
	26.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (.f64 (sin.f64 th) ky)))
✓	46.7%	#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)))))
	38.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))))))
	22.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) #s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
	24.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))))
	28.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin ky) ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))))
	50.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 ky) (.f64 th (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
✓	30.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
▶	7.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) th)))
	17.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (*.f64 ky (/.f64 th (sin.f64 kx)))))
▶	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) th))
	9.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (+.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) #s(literal 1 binary64)) th)))
	15.3%	#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.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 #s(literal -1/6 binary64) th) #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)))
	11.0%	#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)))
	11.0%	#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)))))

Compiler

Compiled 2 650 to 2 364 computations (10.8% saved)

series62.0ms (0.7%)

Memory

22.2MiB live, 74.0MiB allocated; 8ms collecting garbage

Counts

39 → 121

Calls

Call 1

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

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

Calls

9 calls:

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

rewrite229.0ms (2.7%)

Memory

16.7MiB live, 206.4MiB allocated; 26ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	751	4862
0	810	4266
1	4669	4256
0	8272	4078

Stop Event

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

Counts

160 → 434

Calls

Call 1

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

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

eval59.0ms (0.7%)

Memory: -18.4MiB live, 118.6MiB allocated; 13ms collecting garbage
Compiler: Compiled 6 996 to 2 369 computations (66.1% saved)

prune78.0ms (0.9%)

Memory

24.8MiB live, 169.6MiB allocated; 15ms collecting garbage

Pruning

76 alts after pruning (68 fresh and 8 done)

	Pruned	Kept	Total
New	423	26	449
Fresh	9	42	51
Picked	2	3	5
Done	1	5	6
Total	435	76	511

Accuracy

100.0%

Counts

511 → 76

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	95.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	53.5%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 #s(approx (/ 1 (/ 1 (sin kx))) (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) kx) kx) #s(literal 1/6 binary64)) kx) kx #s(literal 1 binary64)) kx)) (sin.f64 ky)))
	53.4%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 #s(approx (/ 1 (/ 1 (sin kx))) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)) (sin.f64 ky)))
	53.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 #s(approx (/ 1 (/ 1 (sin kx))) kx) (sin.f64 ky)))
	29.8%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx)))
	52.5%	(/.f64 (.f64 (sin.f64 th) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))
	60.6%	(/.f64 (*.f64 (sin.f64 th) #s(approx (sin ky) ky)) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))
	46.8%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	46.6%	(/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th)) #s(literal 1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	46.6%	(/.f64 (.f64 #s(approx (sin th) (.f64 (fma.f64 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	32.6%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	88.9%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (sin.f64 th))
	74.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64))))) (sin.f64 th))
	24.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
✓	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	50.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 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)))
	50.3%	(.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)))
	57.3%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (/ 1 (/ 1 (sin kx))) (.f64 (fma.f64 (-.f64 (.f64 #s(approx (+ ( -1/5040 (* kx kx)) 1/120) #s(literal 1/120 binary64)) (.f64 kx kx)) #s(literal 1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	57.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (/ 1 (/ 1 (sin kx))) kx))) (sin.f64 th))
	50.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(approx (sin th) th))
✓	43.6%	(.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)))))) #s(approx (sin th) th))
	38.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) (sin.f64 th))
	38.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))) #s(approx (sin th) th))
	86.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #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 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	20.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
	20.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	30.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	16.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	15.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin th) th))
	76.7%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))) (sin.f64 th))
	19.4%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (/ 1 (/ 1 (sin kx))) (/ 1 (/ 1 (sin kx)))))) (sin.f64 kx))) #s(approx (sin th) th))
	32.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
✓	32.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
	27.7%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64))))) (sin.f64 th))
	22.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(approx (/ 1 (/ 1 (sin kx))) kx))) (sin.f64 th))
	56.4%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	38.3%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (hypot.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (/ 1 (/ 1 (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)))) (sin.f64 th))
	19.7%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) #s(approx (sin th) th))
	29.2%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
	64.5%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	64.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) (sin.f64 kx))) (sin.f64 th))
	45.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) #s(approx (/ 1 (/ 1 (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)))) (sin.f64 th))
	22.7%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	22.4%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	29.5%	(.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
	17.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (/ 1 (/ 1 (sin kx))) (/ 1 (/ 1 (sin kx))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) ky)) #s(approx (sin th) th))
	76.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky))) (sin.f64 th))
	26.7%	#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	22.8%	#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.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))
	95.6%	#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (.f64 (sin.f64 th) (sin.f64 ky))))
	20.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))) (.f64 ky ky) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (sin.f64 th))) ky))
	26.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (.f64 (sin.f64 th) ky)))
✓	46.7%	#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)))))
	38.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))))))
	22.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) #s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
	24.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))))
	28.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin ky) ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))))
	50.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sin.f64 ky) (.f64 th (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
✓	30.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	7.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) (-.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))))))) #s(literal -1/2 binary64) th)))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))) #s(literal -1/2 binary64) th)))
	12.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) #s(literal -1/2 binary64) th)))
	7.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (.f64 (.f64 kx kx) (/.f64 th (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) th)))
	17.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (*.f64 ky (/.f64 th (sin.f64 kx)))))
	2.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(approx (+ (* (/ (* (* kx kx) th) (- 1/2 (* 1/2 (cos (+ ky ky))))) -1/2) th) (/.f64 (.f64 (.f64 (.f64 kx kx) th) #s(literal -1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
	2.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(approx (+ (* (/ (* (* kx kx) th) (- 1/2 (* 1/2 (cos (+ ky ky))))) -1/2) th) (/.f64 (.f64 (.f64 (.f64 kx kx) th) #s(literal -1/2 binary64)) (.f64 ky ky)))))
✓	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) th))
	9.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (+.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) #s(literal 1 binary64)) th)))
	15.3%	#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.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 #s(literal -1/6 binary64) th) #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)))
	11.0%	#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)))
	11.0%	#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)))))

Compiler

Compiled 3 274 to 2 216 computations (32.3% saved)

regimes356.0ms (4.2%)

Memory

18.1MiB live, 575.7MiB allocated; 67ms collecting garbage

Counts

117 → 1

Calls

Call 1

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

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

Calls

9 calls:

46.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
46.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))
44.0ms	(sin.f64 kx)
40.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)))))
39.0ms	(sin.f64 ky)

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)

regimes1.2s (13.6%)

Memory

-131.5MiB live, 709.3MiB allocated; 1.5s collecting garbage

Counts

93 → 5

Calls

Call 1

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

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

Calls

9 calls:

876.0ms	th
73.0ms	(sin.f64 kx)
31.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)))))
31.0ms	ky
30.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
84.9%	4	`(sin.f64 th)`
79.7%	4	`(sin.f64 kx)`
79.9%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
80.6%	3	`(sin.f64 ky)`
88.3%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
76.7%	5	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
78.2%	3	`kx`
78.7%	2	`ky`
83.0%	2	`th`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes33.0ms (0.4%)

Memory

-14.4MiB live, 73.7MiB allocated; 14ms collecting garbage

Counts

91 → 5

Calls

Call 1

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

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

Calls

1 calls:

24.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes35.0ms (0.4%)

Memory

20.9MiB live, 67.7MiB allocated; 21ms collecting garbage

Counts

84 → 5

Calls

Call 1

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

Calls

1 calls:

30.0ms

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

Results

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

regimes27.0ms (0.3%)

Memory

23.4MiB live, 67.7MiB allocated; 6ms collecting garbage

Counts

83 → 5

Calls

Call 1

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

Calls

1 calls:

23.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes29.0ms (0.3%)

Memory

-26.9MiB live, 61.7MiB allocated; 15ms collecting garbage

Counts

75 → 5

Calls

Call 1

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

Calls

1 calls:

21.0ms

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

Results

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

regimes28.0ms (0.3%)

Memory

3.1MiB live, 55.9MiB allocated; 14ms collecting garbage

Counts

68 → 5

Calls

Call 1

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

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

Calls

1 calls:

24.0ms

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

Results

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

regimes21.0ms (0.3%)

Memory

8.4MiB live, 53.5MiB allocated; 4ms collecting garbage

Counts

63 → 5

Calls

Call 1

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

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

Calls

1 calls:

18.0ms

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

Results

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

regimes21.0ms (0.2%)

Memory

4.5MiB live, 49.9MiB allocated; 4ms collecting garbage

Counts

61 → 5

Calls

Call 1

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

Calls

1 calls:

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
88.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 12 to 11 computations (8.3% saved)

regimes95.0ms (1.1%)

Memory

-14.5MiB live, 218.7MiB allocated; 24ms collecting garbage

Counts

60 → 2

Calls

Call 1

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

Outputs

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

(*.f64 (/.f64 (sin.f64 ky) (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

5 calls:

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

Results

Accuracy	Segments	Branch
78.7%	2	`ky`
78.5%	2	`(sin.f64 ky)`
64.6%	1	`(sin.f64 th)`
64.6%	1	`th`
78.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 18 to 25 computations (-38.9% saved)

regimes120.0ms (1.4%)

Memory

-15.5MiB live, 300.8MiB allocated; 31ms collecting garbage

Counts

58 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

24.0ms	ky
17.0ms	(sin.f64 kx)
16.0ms	(sin.f64 ky)
16.0ms	kx
16.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
67.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))`
64.6%	1	`(sin.f64 kx)`
64.6%	1	`kx`
64.6%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
71.6%	2	`(sin.f64 ky)`
71.6%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
67.9%	2	`ky`

Compiler

Compiled 37 to 44 computations (-18.9% saved)

regimes104.0ms (1.2%)

Memory

-12.5MiB live, 271.3MiB allocated; 13ms collecting garbage

Counts

40 → 4

Calls

Call 1

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
47.2%	2	`th`
56.6%	3	`(sin.f64 kx)`
45.4%	1	`(sin.f64 th)`
53.3%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
53.4%	2	`kx`
52.8%	4	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
49.2%	3	`ky`
54.6%	3	`(sin.f64 ky)`
62.5%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes12.0ms (0.1%)

Memory

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

Counts

39 → 4

Calls

Call 1

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes26.0ms (0.3%)

Memory

-21.8MiB live, 71.1MiB allocated; 6ms 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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) 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 #s(literal -1/6 binary64) th) #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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(approx (+ (* (/ (* (* kx kx) th) (- 1/2 (* 1/2 (cos (+ ky ky))))) -1/2) th) (/.f64 (.f64 (.f64 (.f64 kx kx) th) #s(literal -1/2 binary64)) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) #s(literal -1/2 binary64) th)))
#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 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #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)))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))) #s(literal -1/2 binary64) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (*.f64 ky (/.f64 th (sin.f64 kx)))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (/ 1 (/ 1 (sin kx))) (/ 1 (/ 1 (sin kx))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) ky)) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (+.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) #s(literal 1 binary64)) th)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) (pow.f64 #s(approx (sin ky) (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(literal 2 binary64))))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(approx (+ (* (/ (* (* kx kx) th) (- 1/2 (* 1/2 (cos (+ ky ky))))) -1/2) th) (/.f64 (.f64 (.f64 (.f64 kx kx) th) #s(literal -1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (fma.f64 #s(approx (sin ky) ky) #s(approx (sin ky) ky) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin ky) ky) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (.f64 (.f64 kx kx) (/.f64 th (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) (-.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))))))) #s(literal -1/2 binary64) th)))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) #s(approx (sin th) th))
#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 th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.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 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(approx (/ 1 (/ 1 (sin kx))) kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (/ 1 (/ 1 (sin kx))) (/ 1 (/ 1 (sin kx)))))) (sin.f64 kx))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) #s(approx (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) ky)) (sin.f64 th))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))))
(.f64 (/.f64 #s(approx (sin ky) ky) (hypot.f64 #s(approx (sin ky) ky) #s(approx (/ 1 (/ 1 (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)))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx #s(approx (- 1/2 ( 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))) (sin.f64 th))

Outputs

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

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 14 to 15 computations (-7.1% saved)

regimes25.0ms (0.3%)

Memory

30.7MiB live, 72.3MiB allocated; 6ms collecting garbage

Counts

36 → 3

Calls

Call 1

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

Outputs

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

(*.f64 #s(approx (/ (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

2 calls:

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

Compiler

Compiled 14 to 15 computations (-7.1% saved)

regimes41.0ms (0.5%)

Memory

-12.3MiB live, 93.2MiB allocated; 15ms collecting garbage

Counts

35 → 2

Calls

Call 1

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

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

3 calls:

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

Results

Accuracy	Segments	Branch
43.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
43.7%	2	`kx`
53.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 17 to 20 computations (-17.6% saved)

regimes19.0ms (0.2%)

Memory

5.6MiB live, 51.3MiB allocated; 4ms collecting garbage

Counts

27 → 2

Calls

Call 1

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

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

Results

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

regimes76.0ms (0.9%)

Memory

8.6MiB live, 201.2MiB allocated; 16ms collecting garbage

Counts

25 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
40.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
40.4%	2	`kx`
39.5%	2	`(sin.f64 ky)`
40.4%	3	`(sin.f64 kx)`
43.1%	3	`(sin.f64 th)`
43.1%	2	`th`
39.5%	2	`ky`
43.6%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
43.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)

regimes16.0ms (0.2%)

Memory

1.0MiB live, 45.2MiB allocated; 5ms collecting garbage

Counts

20 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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)))))
6.0ms	th

Results

Accuracy	Segments	Branch
37.9%	2	`th`
42.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 13 to 14 computations (-7.7% saved)

regimes12.0ms (0.1%)

Memory

-12.8MiB live, 31.6MiB allocated; 5ms collecting garbage

Counts

13 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

7.0ms

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

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

Results

Accuracy	Segments	Branch
40.2%	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))`
41.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 27 to 24 computations (11.1% saved)

regimes69.0ms (0.8%)

Memory

32.3MiB live, 117.9MiB allocated; 51ms 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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) 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 #s(literal -1/6 binary64) th) #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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(approx (+ (* (/ (* (* kx kx) th) (- 1/2 (* 1/2 (cos (+ ky ky))))) -1/2) th) (/.f64 (.f64 (.f64 (.f64 kx kx) th) #s(literal -1/2 binary64)) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) #s(literal -1/2 binary64) th)))
#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 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #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)))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 #s(approx (- 1/2 ( 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) #s(approx (sin th) th))

Outputs

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

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

Calls

9 calls:

24.0ms	(sin.f64 th)
4.0ms	kx
4.0ms	(sin.f64 kx)
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))
3.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
22.4%	1	`th`
25.8%	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))`
22.4%	1	`(sin.f64 kx)`
25.7%	2	`(sin.f64 ky)`
25.5%	2	`ky`
24.7%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
24.7%	2	`kx`
22.4%	1	`(sin.f64 th)`
26.9%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes81.0ms (1%)

Memory

-35.0MiB live, 114.5MiB allocated; 58ms 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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) 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 #s(literal -1/6 binary64) th) #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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(approx (+ (* (/ (* (* kx kx) th) (- 1/2 (* 1/2 (cos (+ ky ky))))) -1/2) th) (/.f64 (.f64 (.f64 (.f64 kx kx) th) #s(literal -1/2 binary64)) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* (* (sin ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (fma.f64 (/.f64 (.f64 (.f64 kx kx) th) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) #s(literal -1/2 binary64) th)))
#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 (-.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 th th) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) th))

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
19.1%	2	`th`
19.3%	2	`(sin.f64 th)`
20.1%	3	`(sin.f64 kx)`
20.1%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
20.1%	2	`kx`
20.5%	2	`ky`
20.8%	2	`(sin.f64 ky)`
23.5%	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))`
22.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 40 to 51 computations (-27.5% saved)

regimes10.0ms (0.1%)

Memory

27.9MiB live, 27.9MiB 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 ky) th) (/ 1 (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) th))

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 40 to 51 computations (-27.5% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch7.0ms (0.1%)

Memory

-45.9MiB live, 2.8MiB allocated; 8ms collecting garbage

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
6.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9580977406797927	0.9926378075416096
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249
0.0ms	-0.9871721821366358	-0.9834525531353701

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch20.0ms (0.2%)

Memory

-7.2MiB live, 39.1MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	62.765286102531036	216.1009488398486

Samples

15.0ms

80×

valid

Compiler

Compiled 219 to 203 computations (7.3% saved)

Precisions

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

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

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

ival-pow2: 1.0ms (7.6% of total)

adjust: 0.0ms (0% of total)

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.10597406097804338	-0.05343872102481249

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	0.9973733552028557	1.0
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	0.9973733552028557	1.0
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	3.733723504238551e-10	4.7159365633596076e-8
0.0ms	-0.11562861918948021	-0.07401507997706624

Compiler

Compiled 19 to 18 computations (5.3% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.006114025009908844	0.011151371436436176
0.0ms	-0.10597406097804338	-0.05343872102481249

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.006114025009908844	0.011151371436436176

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.006114025009908844	0.011151371436436176

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.972109004503453e-5	0.006114025009908844

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	3.05172985034454e-5	6.972109004503453e-5

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.121128477826196e-48	4.9221590033446017e-45

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.3843422639967096e-34	2.8687172038313984e-25

Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.1350044778231843e-299	3.5466665405333145e-299

Compiler

Compiled 18 to 19 computations (-5.6% saved)

derivations1.3s (15.2%)

Memory

-6.2MiB live, 1 484.8MiB allocated; 307ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 474 to 232 computations (51.1% saved)

preprocess859.0ms (10.2%)

Memory

40.3MiB live, 1 307.7MiB allocated; 225ms collecting garbage

Remove

(negabs th)

(abs kx)

Compiler

Compiled 12 191 to 9 007 computations (26.1% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze326.0ms (3.9%)

sample1.8s (21.2%)

preprocess61.0ms (0.7%)

series107.0ms (1.3%)

rewrite228.0ms (2.7%)

eval19.0ms (0.2%)

prune43.0ms (0.5%)

series54.0ms (0.6%)

rewrite187.0ms (2.2%)

eval56.0ms (0.7%)

prune52.0ms (0.6%)

series96.0ms (1.1%)

rewrite257.0ms (3%)

eval64.0ms (0.8%)

prune84.0ms (1%)

series62.0ms (0.7%)

rewrite229.0ms (2.7%)

eval59.0ms (0.7%)

prune78.0ms (0.9%)

regimes356.0ms (4.2%)

regimes1.2s (13.6%)

regimes33.0ms (0.4%)

regimes35.0ms (0.4%)

regimes27.0ms (0.3%)

regimes29.0ms (0.3%)

regimes28.0ms (0.3%)

regimes21.0ms (0.3%)

regimes21.0ms (0.2%)

regimes95.0ms (1.1%)

regimes120.0ms (1.4%)

regimes104.0ms (1.2%)

regimes12.0ms (0.1%)

regimes26.0ms (0.3%)

regimes25.0ms (0.3%)

regimes41.0ms (0.5%)

regimes19.0ms (0.2%)

regimes76.0ms (0.9%)

regimes16.0ms (0.2%)

regimes12.0ms (0.1%)

regimes69.0ms (0.8%)

regimes81.0ms (1%)

regimes10.0ms (0.1%)

bsearch1.0ms (0%)

bsearch7.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch20.0ms (0.2%)

bsearch1.0ms (0%)

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

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations1.3s (15.2%)

preprocess859.0ms (10.2%)

end0.0ms (0%)

Profiling