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

start0.0ms (0%)

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

analyze257.0ms (3.2%)

Memory

41.8MiB live, 370.3MiB allocated; 147ms 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)

sample2.0s (24.3%)

Memory

6.3MiB live, 2 336.5MiB allocated; 956ms collecting garbage

Samples

1.6s

8 256×

valid

Precisions

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

ival-sin: 729.0ms (63% of total)

ival-pow2: 206.0ms (17.8% of total)

ival-mult: 61.0ms (5.3% of total)

ival-sqrt: 54.0ms (4.7% of total)

ival-div: 49.0ms (4.2% of total)

ival-add: 47.0ms (4.1% of total)

ival-true: 7.0ms (0.6% of total)

adjust: 3.0ms (0.3% of total)

ival-assert: 3.0ms (0.3% of total)

Bogosity

explain220.0ms (2.7%)

Memory

1.7MiB live, 189.8MiB allocated; 22ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
17	-	1	(-2.398918401725246e-298 1.6941561730588456e-160 85.25357855799906)	`(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
0	-	0	-	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
0	-	0	-	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
0	-	0	-	`(sin.f64 kx)`
0	-	0	-	`(sin.f64 th)`
0	-	0	-	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
0	-	0	-	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
0	-	0	-	`th`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
0	-	0	-	`(sin.f64 ky)`
0	-	0	-	`ky`
0	-	0	-	`kx`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`	uflow-rescue	16	0
↳	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`	underflow	66
↳	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`	underflow	55
↳	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`	underflow	16

Confusion

	Predicted +	Predicted -
+	16	1
-	0	239

Precision

1.0

Recall

0.9411764705882353

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	16	0	1
-	0	0	239

Precision?

1.0

Recall?

0.9411764705882353

Freqs

test

number	freq
0	240
1	16

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

84.0ms

512×

valid

Compiler

Compiled 152 to 43 computations (71.7% saved)

Precisions

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

ival-sin: 34.0ms (52.4% of total)

ival-div: 12.0ms (18.5% of total)

ival-pow2: 10.0ms (15.4% of total)

ival-mult: 3.0ms (4.6% of total)

ival-sqrt: 3.0ms (4.6% of total)

ival-add: 2.0ms (3.1% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

preprocess248.0ms (3.1%)

Memory

21.2MiB live, 164.7MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	45	153
1	89	147
2	222	147
3	433	147
4	957	147
5	3013	147
0	13	16
0	22	16
1	30	16
2	53	16
3	113	16
4	238	16
5	585	16
6	2343	16
7	7580	16
0	8120	11

Stop Event

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

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

Outputs

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

Symmetry

(abs kx)

(negabs th)

(negabs ky)

Compiler

Compiled 16 to 13 computations (18.8% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	93.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))

Compiler

Compiled 16 to 13 computations (18.8% saved)

series45.0ms (0.6%)

Memory

2.4MiB live, 46.7MiB allocated; 5ms collecting garbage

Counts

13 → 68

Calls

Call 1

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

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

Calls

9 calls:

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

simplify236.0ms (2.9%)

Memory

-47.9MiB live, 254.8MiB allocated; 92ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	423	2249
1	1330	2183
2	6115	2137
0	8438	1872

Stop Event

1×	iter limit
1×	node limit

Counts

68 → 68

Calls

Call 1

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

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

rewrite66.0ms (0.8%)

Memory

17.7MiB live, 109.6MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	13	66
0	22	66
1	59	66
0	341	51

Stop Event

1×	iter limit
1×	iter limit
1×	iter limit
1×	unsound
1×	iter limit

Counts

13 → 105

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

eval30.0ms (0.4%)

Memory: -15.3MiB live, 81.7MiB allocated; 8ms collecting garbage
Compiler: Compiled 4 646 to 925 computations (80.1% saved)

prune16.0ms (0.2%)

Memory

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

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	165	20	185
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	166	20	186

Accuracy

100.0%

Counts

186 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	64.3%	(.f64 (/.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	85.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 th))
	69.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	86.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
▶	83.9%	(.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))
	41.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 th))
	50.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 th))
	41.3%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	39.2%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	92.1%	(.f64 (/.f64 (sin.f64 ky) (exp.f64 (.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (sin.f64 th))
▶	29.7%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
	32.1%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	20.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (.f64 kx (/.f64 kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 th))
	29.2%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	23.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (fma.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/6 binary64)) (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) ky)) (sin.f64 th))
	43.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) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
▶	27.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 882 to 674 computations (23.6% saved)

series60.0ms (0.7%)

Memory

-3.8MiB live, 89.1MiB allocated; 6ms collecting garbage

Counts

32 → 173

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

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

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)) (pow (sin kx) 2) 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))) (+ (* (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (* (/ 1/2 (sin ky)) kx) (/ 1/2 (sin ky)) 1/2 (* (/ (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) (pow (sin ky) 2))
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)) (pow (sin kx) 2) 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))) (+ (* (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (* (/ 1/2 (sin ky)) kx) (/ 1/2 (sin ky)) 1/2 (* (/ (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) (pow (sin ky) 2))
7.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)) (pow (sin kx) 2) 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))) (+ (* (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (* (/ 1/2 (sin ky)) kx) (/ 1/2 (sin ky)) 1/2 (* (/ (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) (pow (sin ky) 2))
6.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)) (pow (sin kx) 2) 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))) (+ (* (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (* (/ 1/2 (sin ky)) kx) (/ 1/2 (sin ky)) 1/2 (* (/ (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) (pow (sin ky) 2))
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)) (pow (sin kx) 2) 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))) (+ (* (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (* (/ 1/2 (sin ky)) kx) (/ 1/2 (sin ky)) 1/2 (* (/ (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) (pow (sin ky) 2))

simplify172.0ms (2.1%)

Memory

-2.0MiB live, 218.2MiB allocated; 43ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	817	7342
1	2516	7108
0	8234	6460

Stop Event

1×	iter limit
1×	node limit

Counts

173 → 173

Calls

Call 1

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

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

rewrite86.0ms (1.1%)

Memory

5.7MiB live, 107.8MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	41	307
0	70	252
1	209	252
0	1468	252

Stop Event

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

Counts

32 → 501

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

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

eval107.0ms (1.3%)

Memory: -0.3MiB live, 150.2MiB allocated; 64ms collecting garbage
Compiler: Compiled 18 013 to 2 814 computations (84.4% saved)

prune51.0ms (0.6%)

Memory

13.1MiB live, 103.9MiB allocated; 13ms collecting garbage

Pruning

42 alts after pruning (41 fresh and 1 done)

	Pruned	Kept	Total
New	587	35	622
Fresh	9	6	15
Picked	4	1	5
Done	0	0	0
Total	600	42	642

Accuracy

100.0%

Counts

642 → 42

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	38.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	70.5%	(.f64 (/.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64))) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	46.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
	56.6%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)))) (sin.f64 th))
	56.7%	(.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))
	56.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	85.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (sin.f64 th))
	83.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	41.9%	(.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))))) #s(approx (sin th) th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	29.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)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) (.f64 ky ky) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) (sin.f64 th))
	32.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	29.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	41.3%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	17.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
	17.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
	26.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
▶	23.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	26.3%	(.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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	18.5%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx #s(approx (sin ky) ky)))) (sin.f64 th))
	20.9%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 #s(approx (/ 1/2 (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/720 binary64) (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 ky ky) #s(literal 1/2 binary64)) ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
	21.2%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(approx ( (/ 1/2 (sin ky)) kx) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (.f64 kx #s(literal -7/360 binary64)) (.f64 #s(literal 1/12 binary64) kx)) (.f64 ky ky) (.f64 #s(literal 1/2 binary64) kx)) ky)) kx (sin.f64 ky)))) (sin.f64 th))
▶	32.1%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	14.3%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 kx kx))) ky)))) (sin.f64 th))
	8.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (.f64 (/.f64 (.f64 kx kx) ky) #s(literal 1/2 binary64))))) (sin.f64 th))
	33.3%	(.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	33.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	18.6%	(.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
▶	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	39.2%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
	29.2%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	24.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) ky)) (sin.f64 th))
✓	27.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	13.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
	13.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)))
▶	13.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
	38.2%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
	23.9%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 (sin.f64 th) ky)))
	27.7%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))

Compiler

Compiled 2 221 to 1 647 computations (25.8% saved)

series51.0ms (0.6%)

Memory

-5.7MiB live, 94.0MiB allocated; 14ms collecting garbage

Counts

39 → 177

Calls

Call 1

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

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

Calls

9 calls:

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

simplify210.0ms (2.6%)

Memory

14.9MiB live, 244.9MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	814	7534
1	2471	7267
0	8329	6582

Stop Event

1×	iter limit
1×	node limit

Counts

177 → 177

Calls

Call 1

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

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

rewrite95.0ms (1.2%)

Memory

-32.9MiB live, 115.1MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	53	393
0	88	322
1	267	307
0	1857	302

Stop Event

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

Counts

39 → 590

Calls

Call 1

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

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

eval123.0ms (1.5%)

Memory: 24.6MiB live, 161.1MiB allocated; 15ms collecting garbage
Compiler: Compiled 24 131 to 3 479 computations (85.6% saved)

prune115.0ms (1.4%)

Memory

9.2MiB live, 153.6MiB allocated; 29ms collecting garbage

Pruning

52 alts after pruning (49 fresh and 3 done)

	Pruned	Kept	Total
New	685	25	710
Fresh	12	24	36
Picked	3	2	5
Done	0	1	1
Total	700	52	752

Accuracy

100.0%

Counts

752 → 52

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	96.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
▶	38.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	30.6%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))
	44.1%	(/.f64 (*.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	70.5%	(.f64 (/.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64))) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	56.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	85.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 th))
	38.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (sin.f64 th))
	41.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	83.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	38.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	14.0%	(.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)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.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 (sin th) th))
	16.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
	32.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	16.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	28.8%	(.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))
	29.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	41.3%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	17.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
	10.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
▶	21.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 kx kx)))))) (sin.f64 th))
	20.9%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 #s(approx (/ 1/2 (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/720 binary64) (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 ky ky) #s(literal 1/2 binary64)) ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
	16.1%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
	15.9%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	16.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
	14.3%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 kx kx))) ky)))) (sin.f64 th))
	8.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (.f64 (/.f64 (.f64 kx kx) ky) #s(literal 1/2 binary64))))) (sin.f64 th))
	21.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (sin kx) kx))) (sin.f64 th))
	23.5%	(.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 (+ (- 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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	28.9%	(.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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	33.6%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	23.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	18.6%	(.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
	29.2%	(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
✓	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	48.2%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	56.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)) (sin.f64 ky))))
	56.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)) (sin.f64 ky))))
	32.1%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))))
	27.4%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 ky))))
	46.9%	(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	24.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) ky)) (sin.f64 th))
✓	27.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	13.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
▶	13.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)))
✓	13.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
	38.2%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
	23.9%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 (sin.f64 th) ky)))
	27.7%	#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))

Compiler

Compiled 2 703 to 2 005 computations (25.8% saved)

series48.0ms (0.6%)

Memory

6.2MiB live, 103.6MiB allocated; 13ms collecting garbage

Counts

34 → 181

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

Calls

9 calls:

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

simplify213.0ms (2.6%)

Memory

-19.2MiB live, 304.1MiB allocated; 30ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	788	7929
1	2390	7624
0	8259	6905

Stop Event

1×	iter limit
1×	node limit

Counts

181 → 181

Calls

Call 1

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

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

rewrite126.0ms (1.6%)

Memory

-7.7MiB live, 138.7MiB allocated; 14ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	59	447
0	90	426
1	326	406
0	2482	401

Stop Event

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

Counts

34 → 410

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

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

eval103.0ms (1.3%)

Memory: -1.0MiB live, 190.8MiB allocated; 37ms collecting garbage
Compiler: Compiled 29 823 to 3 231 computations (89.2% saved)

prune123.0ms (1.5%)

Memory

32.4MiB live, 242.1MiB allocated; 56ms collecting garbage

Pruning

69 alts after pruning (62 fresh and 7 done)

	Pruned	Kept	Total
New	731	28	759
Fresh	10	34	44
Picked	1	4	5
Done	0	3	3
Total	742	69	811

Accuracy

100.0%

Counts

811 → 69

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	96.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	14.1%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (fma.f64 #s(literal 2 binary64) kx (PI.f64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
	29.1%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	40.9%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
✓	38.3%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	16.8%	(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
	29.8%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky)))
	30.6%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))
	32.8%	(/.f64 (*.f64 (sin.f64 th) #s(approx (sin ky) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	44.1%	(/.f64 (*.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
	70.5%	(.f64 (/.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64))) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	56.9%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
	85.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 th))
	38.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (sin.f64 th))
	41.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	83.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	38.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	14.0%	(.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)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.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 (sin th) th))
	16.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
	32.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	16.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	9.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (fma.f64 #s(literal 2 binary64) kx (PI.f64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	29.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	13.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
	19.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #s(approx (sin th) th))
	23.3%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
✓	17.8%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
	10.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) #s(approx (sin th) th))
	10.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
	11.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 kx kx)))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
	23.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) #s(approx (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) (* kx kx)) (fma.f64 kx kx (*.f64 ky ky))))))) (sin.f64 th))
	20.9%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 #s(approx (/ 1/2 (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/720 binary64) (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 ky ky) #s(literal 1/2 binary64)) ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
	16.1%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
	16.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
	8.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (.f64 (/.f64 (.f64 kx kx) ky) #s(literal 1/2 binary64))))) (sin.f64 th))
	21.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (sin kx) kx))) (sin.f64 th))
	23.5%	(.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 (+ (- 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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	21.5%	(.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 (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 kx kx)))))) (sin.f64 th))
	28.9%	(.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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	15.1%	(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
	23.0%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
	21.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 kx kx)))))) (sin.f64 th))
	18.6%	(.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
	29.2%	(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
✓	99.6%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	48.2%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
	56.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 kx kx) #s(literal -1/6 binary64)) (.f64 kx kx) #s(literal 1 binary64)) kx)) (sin.f64 ky))))
	56.6%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 #s(approx (sin kx) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)) (sin.f64 ky))))
	21.5%	(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) ky) ky (*.f64 kx kx)))))))
	32.1%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))))
	46.9%	(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
	14.1%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) th))
	24.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) ky)) (sin.f64 th))
	27.7%	#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
✓	27.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	13.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 th th)) th (*.f64 #s(literal 1 binary64) th))))
	12.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 th th)) #s(literal 2 binary64)) #s(literal 1 binary64)) th) (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal -1 binary64)))))
	13.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
✓	13.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)))
	13.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) th) th #s(literal 1 binary64)) th)))
	6.5%	#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)))
	7.5%	#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)))
	5.7%	#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 #s(literal 1 binary64) (.f64 th th)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
✓	13.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
	38.2%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
	23.9%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))) (.f64 (sin.f64 th) ky)))

Compiler

Compiled 5 089 to 1 982 computations (61.1% saved)

regimes523.0ms (6.5%)

Memory

-8.6MiB live, 583.7MiB allocated; 274ms collecting garbage

Counts

109 → 1

Calls

Call 1

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

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

Calls

9 calls:

117.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
69.0ms	(sin.f64 th)
59.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)))))
57.0ms	(sin.f64 kx)
53.0ms	th

Results

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

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes287.0ms (3.5%)

Memory

25.4MiB live, 538.8MiB allocated; 59ms collecting garbage

Counts

94 → 1

Calls

Call 1

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

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes265.0ms (3.3%)

Memory

25.9MiB live, 500.7MiB allocated; 96ms collecting garbage

Counts

93 → 2

Calls

Call 1

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

Outputs

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

Calls

9 calls:

38.0ms	th
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)))))
30.0ms	(sin.f64 th)
29.0ms	kx
27.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
85.8%	3	`(sin.f64 th)`
99.5%	3	`(sin.f64 kx)`
99.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.2%	3	`(sin.f64 ky)`
99.4%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
84.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))`
99.5%	2	`kx`
99.2%	2	`ky`
85.8%	2	`th`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes285.0ms (3.5%)

Memory

-36.4MiB live, 390.7MiB allocated; 62ms collecting garbage

Counts

92 → 5

Calls

Call 1

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

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

Calls

9 calls:

61.0ms	(sin.f64 ky)
35.0ms	(sin.f64 th)
32.0ms	th
28.0ms	ky
26.0ms	kx

Results

Accuracy	Segments	Branch
69.9%	4	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
77.2%	4	`(sin.f64 th)`
79.7%	5	`th`
85.8%	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)))))`
78.3%	3	`(sin.f64 ky)`
78.4%	3	`(sin.f64 kx)`
78.3%	2	`ky`
78.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
78.6%	2	`kx`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes25.0ms (0.3%)

Memory

14.9MiB live, 57.3MiB allocated; 5ms collecting garbage

Counts

77 → 5

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.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 (.f64 #s(literal -1/6 binary64) 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 (.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 th th)) th (*.f64 #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 (fma.f64 (.f64 th th) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin 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)) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) #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 (.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 th th)) #s(literal 2 binary64)) #s(literal 1 binary64)) th) (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal -1 binary64)))))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 kx kx)))))) (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)) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 kx kx)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 kx kx)))))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (sin kx) kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 kx kx))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin kx) 2) (.f64 kx kx)))))
(.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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (.f64 (/.f64 (.f64 kx kx) ky) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) #s(approx (+ (* (* ky ky) (+ (* (* ky ky) -1/3) 1)) (* kx kx)) (fma.f64 kx kx (*.f64 ky ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (fma.f64 #s(literal 2 binary64) kx (PI.f64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) ky)) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) ky)) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) ky) ky (*.f64 kx kx)))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 kx kx)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 th th) #s(literal -1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (+ ( (* (/ 1/2 (sin ky)) kx) kx) (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (.f64 kx kx))) ky)))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #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) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (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 (+ (- 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 #s(literal -2 binary64) kx)) #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) kx)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.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 (sin th) th))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky)))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 th) #s(approx (sin ky) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (.f64 kx (/.f64 kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #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)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx (sin.f64 ky)))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) kx) kx #s(approx (sin ky) ky)))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (cos.f64 (fma.f64 #s(literal 2 binary64) kx (PI.f64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(.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 #s(literal -2 binary64) kx)) #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) kx)))) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (.f64 #s(approx (/ 1/2 (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/720 binary64) (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 ky ky) #s(literal 1/2 binary64)) ky)) kx) kx (sin.f64 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 (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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(approx ( (/ 1/2 (sin ky)) kx) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (.f64 kx #s(literal -7/360 binary64)) (.f64 #s(literal 1/12 binary64) kx)) (.f64 ky ky) (.f64 #s(literal 1/2 binary64) kx)) ky)) kx (sin.f64 ky)))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) (.f64 ky ky) #s(literal -1/3 binary64)) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky)))))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #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) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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
85.6%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes22.0ms (0.3%)

Memory

10.4MiB live, 56.1MiB allocated; 3ms collecting garbage

Counts

74 → 5

Calls

Call 1

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

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes24.0ms (0.3%)

Memory

-19.8MiB live, 41.1MiB allocated; 5ms collecting garbage

Counts

73 → 5

Calls

Call 1

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

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

Calls

1 calls:

20.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes130.0ms (1.6%)

Memory

1.9MiB live, 184.2MiB allocated; 21ms collecting garbage

Counts

72 → 5

Calls

Call 1

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

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

Calls

6 calls:

28.0ms	kx
24.0ms	(sin.f64 ky)
21.0ms	ky
20.0ms	(sin.f64 kx)
16.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
76.2%	3	`(sin.f64 ky)`
56.8%	4	`(sin.f64 kx)`
73.2%	2	`ky`
55.9%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
56.3%	3	`kx`
80.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 23 to 31 computations (-34.8% saved)

regimes84.0ms (1%)

Memory

16.0MiB live, 206.7MiB allocated; 18ms collecting garbage

Counts

71 → 4

Calls

Call 1

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
69.7%	5	`(sin.f64 th)`
67.7%	4	`(sin.f64 ky)`
70.0%	4	`th`
76.6%	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 18 to 22 computations (-22.2% saved)

regimes21.0ms (0.3%)

Memory

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

Counts

70 → 4

Calls

Call 1

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

Outputs
(.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)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #s(literal 1/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)) (pow.f64 (sin.f64 kx) #s(literal 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) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) ky)) #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)) (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
76.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 13 to 11 computations (15.4% saved)

regimes76.0ms (0.9%)

Memory

-16.4MiB live, 128.3MiB allocated; 19ms collecting garbage

Counts

64 → 3

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
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))`
52.0%	4	`th`
54.7%	3	`ky`
68.1%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 31 to 30 computations (3.2% saved)

regimes18.0ms (0.2%)

Memory

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

Counts

61 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

14.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes90.0ms (1.1%)

Memory

-21.9MiB live, 68.7MiB allocated; 6ms collecting garbage

Counts

51 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
50.1%	3	`(sin.f64 ky)`
43.1%	6	`(sin.f64 th)`
58.7%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 17 to 19 computations (-11.8% saved)

regimes78.0ms (1%)

Memory

5.4MiB live, 102.2MiB allocated; 6ms collecting garbage

Counts

49 → 4

Calls

Call 1

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
46.1%	3	`ky`
52.0%	3	`(sin.f64 kx)`
49.9%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
50.0%	3	`kx`
54.4%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 21 to 27 computations (-28.6% saved)

regimes13.0ms (0.2%)

Memory

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

Counts

45 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes13.0ms (0.2%)

Memory

-26.5MiB live, 18.1MiB allocated; 4ms collecting garbage

Counts

32 → 3

Calls

Call 1

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

Outputs

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

(*.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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))

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

Calls

1 calls:

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes29.0ms (0.4%)

Memory

10.4MiB live, 54.1MiB allocated; 4ms collecting garbage

Counts

30 → 2

Calls

Call 1

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

Outputs

(*.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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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:

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

8.0ms

(sin.f64 kx)

8.0ms

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

Results

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

Compiler

Compiled 31 to 28 computations (9.7% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

24 → 2

Calls

Call 1

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

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

1 calls:

6.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes17.0ms (0.2%)

Memory

-6.7MiB live, 39.8MiB allocated; 2ms collecting garbage

Counts

17 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 16 to 18 computations (-12.5% saved)

regimes30.0ms (0.4%)

Memory

-0.3MiB live, 56.3MiB allocated; 3ms collecting garbage

Counts

15 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 23 to 31 computations (-34.8% saved)

regimes6.0ms (0.1%)

Memory

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

Outputs

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

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

Calls

1 calls:

4.0ms

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

Results

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

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes16.0ms (0.2%)

Memory

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

Counts

12 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
27.5%	1	`(sin.f64 th)`
30.9%	2	`ky`
31.9%	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))`
36.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 32 to 31 computations (3.1% saved)

regimes18.0ms (0.2%)

Memory

-12.0MiB live, 34.5MiB allocated; 1ms collecting garbage

Counts

8 → 2

Calls

Call 1

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

Outputs

#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)) (sin.f64 th))

Calls

6 calls:

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

Results

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

Compiler

Compiled 23 to 31 computations (-34.8% saved)

regimes50.0ms (0.6%)

Memory

-15.4MiB live, 31.5MiB allocated; 2ms collecting garbage

Counts

7 → 2

Calls

Call 1

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

Outputs

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
16.5%	2	`(sin.f64 ky)`
13.7%	1	`(sin.f64 th)`
13.7%	1	`th`
15.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
13.7%	1	`(sin.f64 kx)`
15.7%	2	`kx`
18.3%	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))`
16.2%	2	`ky`
17.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 42 to 51 computations (-21.4% saved)

regimes7.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 37 to 40 computations (-8.1% saved)

bsearch24.0ms (0.3%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
21.0ms	8.637659760745045e-6	0.17480412468512624

Samples

16.0ms

128×

valid

Compiler

Compiled 371 to 306 computations (17.5% saved)

Precisions

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

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

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

ival-div: 1.0ms (8.2% of total)

ival-add: 1.0ms (8.2% of total)

ival-mult: 1.0ms (8.2% of total)

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

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888
0.0ms	-0.953929228835277	-0.9149273317533869

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch7.0ms (0.1%)

Memory

-46.4MiB live, 1.7MiB allocated; 4ms collecting garbage

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888
0.0ms	-0.953929228835277	-0.9149273317533869

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888
0.0ms	-0.953929228835277	-0.9149273317533869

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888
0.0ms	-0.953929228835277	-0.9149273317533869

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	1.0	1.0000240068040045
0.0ms	0.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888

Compiler

Compiled 19 to 19 computations (0% 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.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888

Compiler

Compiled 19 to 19 computations (0% 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.89235931266928	0.9355451949268442
0.0ms	0.0003878551703368487	0.07449144545155724
0.0ms	-0.08591302155566802	-0.06599616043025888

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653
0.0ms	-0.08591302155566802	-0.06599616043025888

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653
0.0ms	-0.06599616043025888	1.0501243252401087e-307

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653
0.0ms	-0.06599616043025888	1.0501243252401087e-307

Compiler

Compiled 19 to 19 computations (0% 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.15777625384117663	0.16175272515260986
0.0ms	3.275679637767015e-185	8.086600984442917e-180
0.0ms	-0.06599616043025888	1.0501243252401087e-307

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653
0.0ms	3.275679637767015e-185	8.086600984442917e-180

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653
0.0ms	3.275679637767015e-185	8.086600984442917e-180

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.07449144545155724	0.11497234352781653

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0003878551703368487	0.07449144545155724

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0003878551703368487	0.07449144545155724

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.447799292161322e-5	5.807534554822302e-5

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch15.0ms (0.2%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
14.0ms	2.7913274733108073e-101	3.2624976267195023e-96

Samples

8.0ms

144×

valid

Compiler

Compiled 505 to 397 computations (21.4% saved)

Precisions

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

ival-sin: 4.0ms (81.7% of total)

ival-mult: 1.0ms (20.4% of total)

ival-true: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.5368033e-317	8.25283603810082e-308

Compiler

Compiled 19 to 19 computations (0% saved)

simplify96.0ms (1.2%)

Memory

-8.4MiB live, 81.4MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	220	2263
1	304	2263
2	557	2263
3	1326	2259
4	4257	2259

Stop Event

1×	node limit

Calls

Call 1

Inputs
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(if (<=.f64 kx #s(literal 3804640965202595/1152921504606846976 binary64)) (.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) (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 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (/.f64 (.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th)) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (/.f64 (.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th)) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th)) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th)) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #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)) (sin.f64 th)))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal -3602879701896397/72057594037927936 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal -3602879701896397/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal -3602879701896397/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))) (if (<=.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(literal 3827252586451049/76545051729020975577310162521900618820659871603466655644272117978380005723696097587725184512638784526308634214455061267843403507870735540391292521535824647434568377082591826884769598224146796816367616 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)) (if (<=.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(literal 5764607523034235/36028797018963968 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))))
(if (<=.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(literal 3827252586451049/76545051729020975577310162521900618820659871603466655644272117978380005723696097587725184512638784526308634214455061267843403507870735540391292521535824647434568377082591826884769598224146796816367616 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) ky)) (sin.f64 th)) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal 3827252586451049/76545051729020975577310162521900618820659871603466655644272117978380005723696097587725184512638784526308634214455061267843403507870735540391292521535824647434568377082591826884769598224146796816367616 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 (sin.f64 th) ky))) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sin.f64 kx))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.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 (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 kx kx)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 kx kx)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 5902958103587057/295147905179352825856 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 456932444904477/601226901190101306339707032778070279008174732520529886901066488712245510429339761526706943586500787976175353856 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)) (sin.f64 th)))
(if (<=.f64 (.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)) #s(literal 10120113/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Outputs
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(if (<=.f64 kx #s(literal 3804640965202595/1152921504606846976 binary64)) (.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) (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 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (/.f64 (.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th)) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (/.f64 (.f64 #s(approx (sin th) th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th)) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) th)) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -4278419646001971/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th)) (if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))) (sin.f64 th))))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky)))) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #s(literal 1/2 binary64)))))) #s(approx (sin th) th)) (if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.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(literal 8106479329266893/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) ky)) #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)) (sin.f64 th)))))
(if (<=.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(literal -5764607523034235/72057594037927936 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.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)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal -3602879701896397/72057594037927936 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal -3602879701896397/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal -3602879701896397/72057594037927936 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))) (if (<=.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(literal 3827252586451049/76545051729020975577310162521900618820659871603466655644272117978380005723696097587725184512638784526308634214455061267843403507870735540391292521535824647434568377082591826884769598224146796816367616 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #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 #s(literal -2 binary64) kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)) (if (<=.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(literal 5764607523034235/36028797018963968 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx)))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))))
(if (<=.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(literal 3827252586451049/76545051729020975577310162521900618820659871603466655644272117978380005723696097587725184512638784526308634214455061267843403507870735540391292521535824647434568377082591826884769598224146796816367616 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) ky)) (sin.f64 th)) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal 3827252586451049/76545051729020975577310162521900618820659871603466655644272117978380005723696097587725184512638784526308634214455061267843403507870735540391292521535824647434568377082591826884769598224146796816367616 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal -2 binary64) kx)))))) (.f64 (sin.f64 th) ky))) (if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sin th)) (/.f64 (.f64 (sin.f64 th) ky) (sin.f64 kx))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 3602879701896397/36028797018963968 binary64)) #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)))
(if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.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 (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 kx kx)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 1152921504606847/2305843009213693952 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(approx (- (+ (* (+ (* (* ky ky) -1/3) 1) (* ky ky)) 1/2) (* (cos (* -2 kx)) 1/2)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (.f64 kx kx)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 5902958103587057/295147905179352825856 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.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(literal 456932444904477/601226901190101306339707032778070279008174732520529886901066488712245510429339761526706943586500787976175353856 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)) (sin.f64 th)))
(if (<=.f64 (.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)) #s(literal 10120113/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

derivations836.0ms (10.3%)

Memory

0.1MiB live, 808.9MiB allocated; 227ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 263 to 220 computations (90.3% saved)

preprocess185.0ms (2.3%)

Memory

26.6MiB live, 261.6MiB allocated; 28ms collecting garbage

Remove

(negabs ky)

(negabs th)

(abs kx)

Compiler

Compiled 4 624 to 520 computations (88.8% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze257.0ms (3.2%)

sample2.0s (24.3%)

explain220.0ms (2.7%)

preprocess248.0ms (3.1%)

eval0.0ms (0%)

prune1.0ms (0%)

series45.0ms (0.6%)

simplify236.0ms (2.9%)

rewrite66.0ms (0.8%)

eval30.0ms (0.4%)

prune16.0ms (0.2%)

series60.0ms (0.7%)

simplify172.0ms (2.1%)

rewrite86.0ms (1.1%)

eval107.0ms (1.3%)

prune51.0ms (0.6%)

series51.0ms (0.6%)

simplify210.0ms (2.6%)

rewrite95.0ms (1.2%)

eval123.0ms (1.5%)

prune115.0ms (1.4%)

series48.0ms (0.6%)

simplify213.0ms (2.6%)

rewrite126.0ms (1.6%)

eval103.0ms (1.3%)

prune123.0ms (1.5%)

regimes523.0ms (6.5%)

regimes287.0ms (3.5%)

regimes265.0ms (3.3%)

regimes285.0ms (3.5%)

regimes25.0ms (0.3%)

regimes22.0ms (0.3%)

regimes24.0ms (0.3%)

regimes130.0ms (1.6%)

regimes84.0ms (1%)

regimes21.0ms (0.3%)

regimes76.0ms (0.9%)

regimes18.0ms (0.2%)

regimes90.0ms (1.1%)

regimes78.0ms (1%)

regimes13.0ms (0.2%)

regimes13.0ms (0.2%)

regimes29.0ms (0.4%)

regimes8.0ms (0.1%)

regimes17.0ms (0.2%)

regimes30.0ms (0.4%)

regimes6.0ms (0.1%)

regimes16.0ms (0.2%)

regimes18.0ms (0.2%)

regimes50.0ms (0.6%)

regimes7.0ms (0.1%)

bsearch24.0ms (0.3%)

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

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

bsearch15.0ms (0.2%)

bsearch0.0ms (0%)

simplify96.0ms (1.2%)

derivations836.0ms (10.3%)

preprocess185.0ms (2.3%)

end0.0ms (0%)

Profiling